Question

求大神写个易语言编辑框1内容随机抽取100个到编辑框2，导入TXT中的数组

编辑框1导入TXT中的数组。然后随机抽取其中的100个。或者多个！
求大神写...悬赏100分。。





Answer 1

.版本 2

.程序集 窗口程序集1
.程序集变量 数组, 文本型, , "0"
.程序集变量 计数, 整数型
.程序集变量 随机, 整数型

.子程序 __启动窗口_创建完毕

置随机数种子 ()

.子程序 _按钮1_被单击

编辑框1.内容 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\数组.txt”))
数组 ＝ 分割文本 (编辑框1.内容, “ ”, )

.子程序 _按钮2_被单击

随机 ＝ 取随机数 (1, 取数组成员数 (数组))
.如果真 (数组 [随机] ≠ “已选”)
编辑框2.加入文本 (数组 [随机] ＋ “ ”)
数组 [随机] ＝ “已选”
计数 ＝ 计数 ＋ 1
.如果真结束
.如果真 (计数 ＜ 100)
_按钮2_被单击 ()
.如果真结束

追问

大神能发个源码给我吗？

追答

上面的就是源码啊!!!!

追问

大神你这个不是随机出100个啊，是直接后面100个。

追答

不可能~~~
你如果给的数组小于100个,会进入死循环.
正好100个会很慢选中这100个数.

追问

大神你的联系方式有吗？我把数组发给你试试！

追答

你把"数组.txt"发到百度网盘,再在私信给我个连接地址,我再帮你调试一下程序后,会在私信里,重给你一个程序的连接地址.别忘了采衲啊.

Answer 2

先把txt文件上传