.版本 2
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
.子程序 _按钮1_被单击
.局部变量 文本, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 临时文本, 文本型
.局部变量 次数, 整数型
.局部变量 临时, 文本型
临时文本 = 编辑框1.内容
文本_逐字分割 (临时文本, 文本)
次数 = 取数组成员数 (文本)
.循环判断首 ()
临时文本 = “”
.计次循环首 (次数, i)
临时 = 文本 [i] ' 1 2 3
临时文本 = 临时文本 + 临时
.计次循环尾 ()
编辑框1.内容 = 临时文本
临时 = 文本 [1]
删除成员 (文本, 1, 1)
加入成员 (文本, 临时)
延迟 (500)
.循环判断尾 (真)