求高手帮下忙，随机数的用法。太难了，刚学易语言。

易King

要在下图这么多标签框里面得随机数必须一行一行代码的写吗？有没有简单的方法。同时这么多随机数还要不能出现重复？用什么方法可以做到？

还请各位大佬支支招，谢谢！！！！

zainex

每个标签组件都有一个标记选项，你按数字从1到N给填写上，对应标签1到标签N：

然后直接用父窗口的 取标记组件 方法就能直接放到一个循环里进行处理：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
取不重复随机数
参数名	类 型	参考	可空	数组	备 注
数组	整数型
最小	整数型
最大	整数型

变量名	类 型	静态	数组	备 注
数量	整数型
数	整数型

数量 ＝ 最大 － 最小 ＋ 1
如果真 (数量 ＜ 1)
返回 ()
重定义数组 (数组, 假, 数量)
计次循环首 (数量, 数)
数组 [数] ＝ 最小 ＋ 数 － 1
计次循环尾 ()
置随机数种子 ()
计次循环首 (数量, )
交换变量 (数组 [取随机数 (1, 数量)], 数组 [取随机数 (1, 数量)])
计次循环尾 ()

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
标签	标签
数	整数型
数组	整数型		0

取不重复随机数 (数组, 10, 100)
计次循环首 (30, 数)
标签 ＝ _启动窗口.取标记组件 (数)
标签.横向对齐方式 ＝ 1
标签.标题 ＝ 到文本 (数组 [数])
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 取不重复随机数<br /> .参数 数组, 整数型, 数组<br /> .参数 最小, 整数型<br /> .参数 最大, 整数型<br /> .局部变量 数量, 整数型<br /> .局部变量 数, 整数型<br /> <br /> 数量 ＝ 最大 － 最小 ＋ 1<br /> .如果真 (数量 ＜ 1)<br />     返回 ()<br /> .如果真结束<br /> 重定义数组 (数组, 假, 数量)<br /> .计次循环首 (数量, 数)<br />     数组 [数] ＝ 最小 ＋ 数 － 1<br /> .计次循环尾 ()<br /> 置随机数种子 ()<br /> .计次循环首 (数量, )<br />     交换变量 (数组 [取随机数 (1, 数量)], 数组 [取随机数 (1, 数量)])<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 标签, 标签<br /> .局部变量 数, 整数型<br /> .局部变量 数组, 整数型, , "0"<br /> <br /> 取不重复随机数 (数组, 10, 100)<br /> .计次循环首 (30, 数)<br />     标签 ＝ _启动窗口.取标记组件 (数)<br />     标签.横向对齐方式 ＝ 1<br />     标签.标题 ＝ 到文本 (数组 [数])<br /> .计次循环尾 ()

代码例子.zip (1.81 KB, 下载次数: 3)

3 天前 上传

点击文件名下载附件

baitso

寻找组件

aipca

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
找标签	整数型
i	整数型
标签事件	标签

置随机数种子 ()
找标签 ＝ 寻找组件 (_启动窗口, , “标签”, , )
计次循环首 (取找到组件数目 (找标签), i)
判断 (i ＝ 取随机数 (i － 1, 取找到组件数目 (找标签) － 1))
标签事件 ＝ 取所找到组件 (找标签, 取随机数 (i － 1, 取找到组件数目 (找标签) － 1))
标签事件.标题 ＝ “是我！”



计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 找标签, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 标签事件, 标签<br /> <br /> 置随机数种子 ()<br /> 找标签 ＝ 寻找组件 (_启动窗口, , “标签”, , )<br /> .计次循环首 (取找到组件数目 (找标签), i)<br />     .判断开始 (i ＝ 取随机数 (i － 1, 取找到组件数目 (找标签) － 1))<br />         标签事件 ＝ 取所找到组件 (找标签, 取随机数 (i － 1, 取找到组件数目 (找标签) － 1))<br />         标签事件.标题 ＝ “是我！”<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

寻找组件（）

走一回

是什么的随机？在几到几的随机？1到1000，那先生成1到1000的顺序数组，再用随机排列来打乱，这样就能按数组下标顺序来取出随机数，而且不会重复了

补充内容 (2025-5-7 18:07):
就是上一层的代码的意思。

Ruang

是取单个标签吗，有两个方法，一 寻找组件 二 标记组件