文本去重复随机姓名、数字和字母

i ＝ 取启动时间 ()
_启动窗口.标题 ＝ “正在努力工作中...”
连续赋值 (真, 按钮1.禁止, 按钮2.禁止, 按钮3.禁止)
循环 ＝ 到整数 (编辑框1.内容)
文件号 ＝ 打开内存文件 ()
.计次循环首 (循环, )
写文本行 (文件号, 到文本 (取随机数 (1, 900000)))
.计次循环尾 ()
移到文件首 (文件号)
文本 ＝ 读入文本 (文件号, )
关闭文件 (文件号)
写到文件 (取当前目录 () ＋ “\数字_” ＋ 到文本 (取现行时间 ()) ＋ “.txt”, 到字节集 (文本))
_启动窗口.标题 ＝ “已生成数字： ” ＋ 到文本 (循环) ＋ “个 ” ＋ 到文本 ((取启动时间 () － i) ÷ 1000) ＋ “ 妙”
连续赋值 (假, 按钮1.禁止, 按钮2.禁止, 按钮3.禁止)