文本批量处理软件/提取固定格式的内容

.如果真 (获取到的数据 ＝ “”)
' 信息框 (“您没有复制数据呢”, 0, , )
状态条1.置文本 (1, “错误,当前没有复制数据”)
返回 ()
.如果真结束
数量_原始数据 ＝ 文本_分割文本 (获取到的数据, #换行符, , 原始数据) ' 用换行符做分隔符 用的精易模块的命令
调试输出 (数量_原始数据)
.计次循环首 (数量_原始数据, 局_计次)
处理事件 ()
.如果真 (文本_取长度 (原始数据 [局_计次]) ＞ 5) ' 判断如果文本长度大于5 就向下执行
有效数据 ＝ 有效数据 ＋ 原始数据 [局_计次] ＋ #换行符 ' 没说的,就是将获取到的数据添加到一个变量里
.如果真结束

.计次循环尾 ()
编辑框4.内容 ＝ 有效数据
状态条1.置文本 (1, “一共有” ＋ 到文本 (数量_原始数据) ＋ “条数据,有效数据为:” ＋ 到文本 (文本_取行数 (文本_删除空行 (有效数据))) ＋ “条”)