|
发表于 2013-11-11 16:48:58
|
显示全部楼层
海南省琼海市
[e]
.版本 2
.程序集 窗口程序集1
.程序集变量 上次搜索的位置, 整数型
.子程序 __启动窗口_创建完毕
上次搜索的位置 = 1
.子程序 _按钮1_被单击
.局部变量 分号位置, 整数型
.局部变量 换行符位置, 整数型
分号位置 = 寻找文本 (编辑框1.内容, “,”, 上次搜索的位置, 假)
换行符位置 = 寻找文本 (编辑框1.内容, #换行符, 上次搜索的位置, 假)
.如果 (换行符位置 ≠ -1)
编辑框2.内容 = 取文本中间 (编辑框1.内容, 上次搜索的位置, 分号位置 - 上次搜索的位置)
编辑框3.内容 = 取文本中间 (编辑框1.内容, 分号位置 + 1, 换行符位置 - 分号位置 - 1)
上次搜索的位置 = 换行符位置 + 2
.否则
编辑框2.内容 = 取文本中间 (编辑框1.内容, 上次搜索的位置, 分号位置 - 上次搜索的位置)
编辑框3.内容 = 取文本中间 (编辑框1.内容, 分号位置 + 1, 取文本长度 (编辑框1.内容) - 分号位置 + 1)
上次搜索的位置 = 取文本长度 (编辑框1.内容) + 2
[/e] |
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻 |
查看全部评分
|