|

用了许久的精易模块.首先感谢斑竹对精易模块的无私奉献精神.
在使用过程中发现一个命令存在些问题
文本_取中间_批量
怎么说呢..很难说清楚是什么原因. 但斑竹请看这样写是否更好
.版本 2
.子程序 文本_取中间_批量, 文本型, 公开, 比如:欲取全文本为“12345”,现在要取出“3”,<3>的前面为“2”,<3>的后面为“4”,
.参数 欲取全文本, 文本型, , 比如:欲取全文本为 12345
.参数 前面文本, 文本型, , 3的前面为“2”,引号直接用 #引号,如:"<font color=#引号red#引号>"
.参数 后面文本, 文本型, , 3的后面为“4”,引号直接用 #引号,如:"<font color=#引号red#引号>"
.参数 起始搜寻位置, 整数型, 可空, 可空。1为首位置,2为第2个位置,如此类推,如果被省略,则“寻找字节集”命令默认从首部开始,“倒找字节集”命令默认从尾部开始。
.参数 是否区分大小写, 逻辑型, 可空, 可空。初始值为“假”。假 = 不区分 真 = 区分大小写。
.参数 数组, 文本型, 数组
.局部变量 局_文本, 文本型
.局部变量 局_位置, 整数型
.局部变量 原文本备份, 文本型
原文本备份 = 欲取全文本
是否区分大小写 = 取反 (是否区分大小写)
.如果真 (寻找文本 (前面文本, “#引号”, , 假) ≠ -1)
前面文本 = 子文本替换 (前面文本, “#引号”, #引号, , , 真)
.如果真结束
.如果真 (寻找文本 (后面文本, “#引号”, , 假) ≠ -1)
后面文本 = 子文本替换 (后面文本, “#引号”, #引号, , , 真)
.如果真结束
局_位置 = 寻找文本 (欲取全文本, 前面文本, 起始搜寻位置, 是否区分大小写)
.如果真 (局_位置 = -1)
返回 (“”)
.如果真结束
局_文本 = 取文本右边 (欲取全文本, 取文本长度 (欲取全文本) - 局_位置 - 取文本长度 (前面文本) + 1)
局_位置 = 寻找文本 (局_文本, 后面文本, 起始搜寻位置, 是否区分大小写)
.如果真 (局_位置 = -1)
返回 (“”)
.如果真结束
局_文本 = 取文本左边 (局_文本, 局_位置 - 1)
加入成员 (数组, 局_文本)
欲取全文本 = 子文本替换 (欲取全文本, 前面文本 + 局_文本, “”, , , 真)
文本_取中间_批量(欲取全文本, 前面文本, 后面文本, , , 数组)
欲取全文本 = 原文本备份
返回 (“”)
本人小菜,虽然写了几年的C,但接触E还是没多久,或许有考虑不周的地方.如果建议对斑竹没有任何帮助斑竹一笑而过便罢,因为我现在用的文本_取中间_批量命令是自己写的,.精易模块里提供的不好用才来反馈这问题..
谢谢
祝精易论坛越办越好
|
|