文本_取出中间文本增加个后面文本的位置返回参数

小A病毒 · 发表于 2021-11-9 19:09:28

本帖最后由小A病毒于 2021-11-9 19:11 编辑

子程序名	返回值类型	公开	备注
文本_取出中间文本1	文本型		比如：欲取全文本为“12345”,现在要取出“3”，<3>的前面为“2”，<3>的后面为“4”，
参数名	类型	参考	可空	数组	备注
欲取全文本	文本型				比如：欲取全文本为 12345
前面文本	文本型				3的前面为“2”，引号直接用 #引号，如："[color=#引号red#引号]"
后面文本	文本型				3的后面为“4”，引号直接用 #引号，如："[color=#引号red#引号]"
起始搜寻位置	整数型				可空,这里是指搜寻参数二前面文本的开始位置
是否不区分大小写	逻辑型				为真不区分大小写，为假区分。
接收后面位置	整数型				接收右边寻找文本的位置

变量名	类型	静态	数组	备注
局_前面文本位置	整数型
局_后面文本位置	整数型
局_前面文本	文本型
局_后面文本	文本型

局_前面文本＝子文本替换 (前面文本, “#引号”, #引号, , , 真)
局_后面文本＝子文本替换 (后面文本, “#引号”, #引号, , , 真)
局_前面文本位置＝寻找文本 (欲取全文本, 局_前面文本, 起始搜寻位置, 是否不区分大小写)

如果真 (局_前面文本位置 ≠ -1)

局_前面文本位置＝局_前面文本位置＋取文本长度 (局_前面文本)

局_后面文本位置＝寻找文本 (欲取全文本, 局_后面文本, 局_前面文本位置, 是否不区分大小写)

如果真 (局_后面文本位置 ≠ -1)

如果真 (是否为空 (接收后面位置) ＝假)

接收后面位置＝局_后面文本位置＋取文本长度 (后面文本)

返回 (取文本中间 (欲取全文本, 局_前面文本位置, 局_后面文本位置－局_前面文本位置))

返回 (“”)

.版本 2<br />
<br />
.子程序 文本_取出中间文本1, 文本型, 公开, 比如：欲取全文本为“12345”,现在要取出“3”，<3>的前面为“2”，<3>的后面为“4”，<br />
.参数 欲取全文本, 文本型, , 比如：欲取全文本为 12345<br />
.参数 前面文本, 文本型, , 3的前面为“2”，引号直接用 #引号，如："[color=#引号red#引号]"<br />
.参数 后面文本, 文本型, , 3的后面为“4”，引号直接用 #引号，如："[color=#引号red#引号]"<br />
.参数 起始搜寻位置, 整数型, 可空, 可空,这里是指搜寻 参数二 前面文本 的开始位置<br />
.参数 是否不区分大小写, 逻辑型, 可空, 为真不区分大小写，为假区分。<br />
.参数 接收后面位置, 整数型, 参考 可空, 接收右边寻找文本的位置<br />
.局部变量 局_前面文本位置, 整数型<br />
.局部变量 局_后面文本位置, 整数型<br />
.局部变量 局_前面文本, 文本型<br />
.局部变量 局_后面文本, 文本型<br />
<br />
局_前面文本 ＝ 子文本替换 (前面文本, “#引号”, #引号, , , 真)<br />
局_后面文本 ＝ 子文本替换 (后面文本, “#引号”, #引号, , , 真)<br />
局_前面文本位置 ＝ 寻找文本 (欲取全文本, 局_前面文本, 起始搜寻位置, 是否不区分大小写)<br />
.如果真 (局_前面文本位置 ≠ -1)<br />
    局_前面文本位置 ＝ 局_前面文本位置 ＋ 取文本长度 (局_前面文本)<br />
    局_后面文本位置 ＝ 寻找文本 (欲取全文本, 局_后面文本, 局_前面文本位置, 是否不区分大小写)<br />
    .如果真 (局_后面文本位置 ≠ -1)<br />
        .如果真 (是否为空 (接收后面位置) ＝ 假)<br />
            接收后面位置 ＝ 局_后面文本位置 ＋ 取文本长度 (后面文本)<br />
        .如果真结束<br />
        返回 (取文本中间 (欲取全文本, 局_前面文本位置, 局_后面文本位置 － 局_前面文本位置))<br />
    .如果真结束<br />
<br />
.如果真结束<br />
返回 (“”)

[color=#引号red#引号][color=#引号red#引号]

[color=#引号red#引号][color=#引号red#引号]

希望加个返回后面文本位置的参数，方便继续寻找下面的文本。避免已经寻找过的位置重复寻找
[color=#引号red#引号][color=#引号red#引号]