易语言编写问题

楼上的代码太多,我给你个更好的~~~~
.版本 2

.程序集 窗口程序集1
.程序集变量 数组, 文本型, , "0"
.程序集变量 count

.子程序 __启动窗口_创建完毕
.局部变量 n

.变量循环首 (#A键, #Z键, 1, n)
加入成员 (数组, 字符 (n))
.变量循环尾 ()
.变量循环首 (#键0, #键9, 1, n)
加入成员 (数组, 字符 (n))
.变量循环尾 ()
count ＝ 取数组成员数 (数组)

.子程序 _按钮1_被单击
.局部变量 tmp, 文本型
.局部变量 n

置随机数种子 ()
.计次循环首 (10, n)
tmp ＝ tmp ＋ 数组 [取随机数 (1, count)]
.计次循环尾 ()
标签1.标题 ＝ tmp

.程序集 窗口程序集1

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

.子程序 _退出按钮_被单击

结束 ()

.子程序 _按钮1_被单击
.局部变量 字符串, 文本型
.局部变量 串长, 整数型
.局部变量 密码最大长度, 整数型
.局部变量 字符位置, 整数型, , "0"
.局部变量 最小位数, 整数型
.局部变量 最大位数, 整数型
.局部变量 密码, 文本型, , "0"
.局部变量 现长, 整数型
.局部变量 I, 整数型
.局部变量 标志, 逻辑型
.局部变量 密码串, 文本型
.局部变量 J, 整数型

密码最大长度 ＝ 16
字符串 ＝ “”
.如果真 (选择框2.选中)
字符串 ＝ 字符串 ＋ “abcdefghij