真晕,又是你,又是这类问题: 下次这类问题,最好把你编辑框内的内容发出来
.版本 2
.子程序 _按钮1_被单击
.局部变量 数组, 文本型, , "0"
.局部变量 A, 整数型
.局部变量 要找的内容, 文本型
要找的内容 = “ ”
.如果真 (要找的内容 = “”)
返回 ()
.如果真结束
数组 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (数组), A)
.如果真 (寻找文本 (数组 [A], 要找的内容, , 假) > 0)
编辑框2.加入文本 (数组 [A] + #换行符)
.如果真结束
.计次循环尾 ()