.版本 2 .程序集 窗口程序集_启动窗口 .子程序 __启动窗口_创建完毕 置随机数种子 () .子程序 _按钮1_被单击 .局部变量 长度, 整数型 .局部变量 数组, 整数型, , "0" .局部变量 文本, 文本型, , "4" .局部变量 临时, 文本型 .局部变量 循环, 整数型 .局部变量 循环1, 整数型 长度 ＝ 到整数 (编辑框1.内容) .计次循环首 (4, 循环) 文本_取出N组不重复数字 (数组, 长度, 0, 9) .判断循环首 (数组 [1] ＝ 0) 文本_取出N组不重复数字 (数组, 长度, 0, 9) .判断循环尾 () .计次循环首 (长度, 循环1) 文本 [循环] ＝ 文本 [循环] ＋ 到文本 (数组 [循环1]) .计次循环尾 () ' 调试输出 (文本) .计次循环尾 () 编辑框2.内容 ＝ 文本 [1] 编辑框3.内容 ＝ 文本 [2] 编辑框4.内容 ＝ 文本 [3] 编辑框5.内容 ＝ 文本 [4]