随机抽号小软件可添加文本

.如果真 (文件是否存在 (取运行目录 () ＋ “\抽号文本.txt”))
编辑框1.内容 ＝ 读入文本 (打开文件 (取运行目录 () ＋ “\抽号文本.txt”, , ), )
关闭文件 (打开文件 (取运行目录 () ＋ “\抽号文本.txt”, , ))

.如果 (文件是否存在 (取运行目录 () ＋ “\抽号文本.txt”))
文件号 ＝ 打开文件 (取运行目录 () ＋ “\抽号文本.txt”, , )
分割后 ＝ 分割文本 (读入文本 (文件号, ), #换行符, )
关闭文件 (文件号)
范围_小 ＝ 1
i ＝ 1
.判断循环首 (分割后 [i] ≠ “-”)
i ＝ i ＋ 1
.判断循环尾 ()
范围_大 ＝ i － 1
.判断循环首 (按钮1.标题 ＝ “停止”)
置随机数种子 ()
编辑框3.内容 ＝ 分割后 [取随机数 (范围_小, 范围_大)]
延迟 (10)
.判断循环尾 ()
.否则
.判断循环首 (按钮1.标题 ＝ “停止”)
置随机数种子 ()
编辑框3.内容 ＝ 到文本 (取随机数 (最小值, 最大值))
延迟 (10)
.判断循环尾 ()'希望能帮助那些纯小白，此款软件用途广泛，不管是用作号码抽签还是用作年会抽奖都是一个不错的选择。