Question

易语言如何实现数字随机变化、谁给下源码、

Answer 1

.版本 2.程序集 窗口程序集1.子程序 _按钮1_被单击
.局部变量 红球, 整数型, , "0"
.局部变量 篮球, 整数型, , "16"
.局部变量 c, 整数型, , "0"
.局部变量 i, 整数型
.局部变量 q, 整数型
.局部变量 w, 整数型
.局部变量 出球, 整数型
.局部变量 结果, 整数型
.局部变量 次数, 整数型编辑框1.内容 ＝ “”
.计次循环首 (33, i)
加入成员 (红球, i)
.计次循环尾 ()
置随机数种子 ()
.计次循环首 (6, w)
q ＝ 取数组成员数 (红球)
置随机数种子 (取随机数 (0, 1e+014))
出球 ＝ 取随机数 (1, q)
输出调试文本 (出球)
结果 ＝ 红球 [出球]
' 数组排序 (红球, )
删除成员 (红球, 出球, )
加入成员 (c, 结果)
数组排序 (c, 真).计次循环尾 ()
.计次循环首 (6, w)
编辑框1.内容 ＝ 编辑框1.内容 ＋ 到文本 (c [w]) ＋ “,”
.计次循环尾 ()
编辑框2.内容 ＝ 到文本 (取随机数 (1, 16)).子程序 _标签3_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
这是我写的双色球随机取值，你自己参考着捉摸吧

Answer 2

楼上的方法真的无语。其实没那么麻烦。他只要随机。不需要取出重复的！[申明：本方法可能会随机取到相同的数]