.版本2.程序集窗口程序集1.程序集变量暂停,逻辑型.程序集变量结果,文本型,,\"0\".程序集变量x,整数型.子程序__启动窗口_创建完毕编辑框1.内容=“AABB”编辑框2.输入方式=3.子程序_按钮开始_被单击.如果真(暂停≠真)x=x+1.如果真(x≤取数组成员数(结果))编辑框3.加入文本(结果[x]+“”).如果真结束.如果真结束.子程序_按钮暂停_被单击.如果(暂停=假)暂停=真.否则暂停=假.如果结束.子程序_编辑框2_内容被改变.局部变量计次,整数型清除数组(结果)x=0编辑框3.内容=“”.如果真(编辑框2.内容≠“”).计次循环首(到数值(编辑框2.内容),计次)加入成员(结果,编辑框1.内容+到文本(计次)).计次循环尾().如果真结束
|