.版本 2
.子程序 _按钮1_被单击
.局部变量 分行内容, 文本型, , "0"
.局部变量 计次, 整数型
.如果真 (编辑框1.内容 = “”)
信息框 (“没有更多了!”, 0, , )
返回 ()
.如果真结束
分行内容 = 分割文本 (编辑框1.内容, #换行符, )
编辑框2.内容 = 分行内容 [1] + #换行符 + 编辑框2.内容
删除成员 (分行内容, 1, 1)
编辑框1.内容 = “”
.计次循环首 (取数组成员数 (分行内容), 计次)
编辑框1.加入文本 (分行内容 [计次] + #换行符)
.计次循环尾 ()