.版本
2
.子程序
__启动窗口_创建完毕
编辑框1.是否允许多行
=
真
编辑框2.是否允许多行
=
真
.子程序
_按钮1_被单击
.局部变量
数组,
文本型,
,
"0"
.局部变量
计数,
整数型
.局部变量
计次,
整数型
数组
=
分割文本
(编辑框1.内容,
#换行符,
)
编辑框1.内容
=
“”
编辑框2.内容
=
“”
.计次循环首
(取数组成员数
(数组),
计次)
.如果真
(数组
[计次]
=
“”)
到循环尾
()
.如果真结束
编辑框1.内容
=
编辑框1.内容
+
数组
[计次]
+
#换行符
.变量循环首
(计次
+
1,
取数组成员数
(数组),
1,
计数)
.如果真
(数组
[计次]
=
数组
[计数])
数组
[计数]
=
“”
编辑框2.内容
=
编辑框2.内容
+
数组
[计次]
+
#换行符
.如果真结束
.变量循环尾
()
.计次循环尾
()