.版本 2
.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量 合一, 文本型
.变量循环首 (0, 组合框1.取项目数 () － 1, 1, i)
合一 ＝ 合一 ＋ 组合框1.取项目文本 (i)
.变量循环尾 ()
列表框1.加入项目 (编辑框1.内容 ＋ “ ” ＋ 合一, )
.变量循环首 (0, 列表框1.取项目数 () － 1, 1, i)
写到文件 (取运行目录 () ＋ “\1.txt”, 到字节集 (列表框1.取项目文本 (i)))
.变量循环尾 ()
.子程序 __启动窗口_创建完毕
.局部变量 行数, 文本型, , "0"
.局部变量 a, 文本型
.局部变量 i, 整数型
a ＝ 到文本 (读入文件 (“1.txt”))
行数 ＝ 分割文本 (a, #换行符, )
.计次循环首 (取数组成员数 (行数), i)
列表框1.加入项目 (行数 [i], )
.计次循环尾 ()
留下qq可以吗？
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024