|
发表于 2011-4-13 17:19:50
|
显示全部楼层
广东省深圳市
[e].版本 2
.程序集 窗口程序集1
.程序集变量 问题数组, 文本型, , "0"
.子程序 _编辑框1_内容被改变
.局部变量 x, 整数型
.局部变量 临时数组, 文本型, , "0"
编辑框2.内容 = “”
.计次循环首 (取数组成员数 (问题数组), x)
.如果真 (寻找文本 (问题数组 [x], 编辑框1.内容, , 假) ≠ -1)
临时数组 = 分割文本 (问题数组 [x], “@@”, )
编辑框2.加入文本 (临时数组 [2] + #换行符) ' 直接显示答案
' 编辑框2.加入文本 (问题数组 [x] + #换行符) ' 显示全部
.如果真结束
.计次循环尾 ()
.子程序 __启动窗口_创建完毕
问题数组 = 分割文本 (#常量1, #换行符, )
' 以下为 #常量1 的内容及格式,如果显示全部内容,就不需要修改
' 当古文明只剩下难解的语言 传说就成了永垂不朽的诗篇@@爱在西元前
' 多少人为生命在努力勇敢的走下去 @@稻香
' 放在糖果旁的是我很想回忆的甜 @@半岛铁盒[/e] |
评分
-
查看全部评分
|