|
发表于 2013-12-12 09:07:25
|
显示全部楼层
广东省东莞市
[e]
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 局_原文本数组, 文本型, , "0"
.局部变量 局_计次, 整数型
.局部变量 局_文本处理数组, 文本型, , "0"
.局部变量 局_临时文本, 文本型
' 用了 论坛的 精易模块 命令
局_原文本数组 = 分割文本 (编辑框1.内容, #换行符, )
.计次循环首 (取数组成员数 (局_原文本数组), 局_计次)
局_临时文本 = 取文本左边 (局_原文本数组 [局_计次], 倒找文本 (局_原文本数组 [局_计次], “.”, , 假) - 1)
加入成员 (局_文本处理数组, 局_临时文本)
.计次循环尾 ()
数组_去重复 (局_文本处理数组, )
局_临时文本 = 编辑框1.内容
.计次循环首 (取数组成员数 (局_文本处理数组), 局_计次)
编辑框2.加入文本 (文本_取指定变量文本行 (局_临时文本, 文本_取文本所在行 (局_临时文本, 局_文本处理数组 [局_计次])) + #换行符)
.计次循环尾 ()
[/e] |
评分
-
参与人数 1 | 荣誉 +1 |
收起
理由
|
笨潴
| + 1 |
热心帮助他人,荣誉+1,希望继续努力(*^__^*) 嘻嘻 |
查看全部评分
|