倒找文本的问题

wangshiyuan

倒找文本替换的问题.rar (549.03 KB, 下载次数: 0)

2020-2-14 17:42 上传

点击文件名下载附件

  

变量名	类 型	静态	数组	备 注
分割结果	文本型		0
名称	文本型
i	整数型
ii	整数型
文本	文本型
倒找文本	整数型
新名称	文本型

分割结果 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (超级列表框10.取表项数 (), i)
名称 ＝ 超级列表框10.取标题 (i － 1, 1)
计次循环首 (取数组成员数 (分割结果), ii)
文本 ＝ 分割结果 [ii]
倒找文本 ＝ 倒找文本 (名称, 文本, , 假)
如果 (倒找文本 ≠ -1)
新名称 ＝ 取文本左边 (名称, 倒找文本 － 1)
超级列表框10.置标题 (i － 1, 1, 新名称)
跳出循环 ()



计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 分割结果, 文本型, , "0"<br /> .局部变量 名称, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 ii, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 倒找文本, 整数型<br /> .局部变量 新名称, 文本型<br /> <br /> 分割结果 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (超级列表框10.取表项数 (), i)<br />     名称 ＝ 超级列表框10.取标题 (i － 1, 1)<br />     .计次循环首 (取数组成员数 (分割结果), ii)<br />         文本 ＝ 分割结果 [ii]<br />         倒找文本 ＝ 倒找文本 (名称, 文本, , 假)<br />         .如果 (倒找文本 ≠ -1)<br />             新名称 ＝ 取文本左边 (名称, 倒找文本 － 1)<br />             超级列表框10.置标题 (i － 1, 1, 新名称)<br />             跳出循环 ()<br />         .否则<br /> <br />         .如果结束<br /> <br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()

请教大神:判断超级列表框的标题最后面的内容有没有和编辑框的文本相同，有相同的就替换掉相同的部分。一定是从后面最后一个字母算起。我用倒找文本的方式写的，但是超级列表框的标题最后面的内容不是和编辑框的文本相同怎么也替换了？请大师帮我看看那里出问题了，谢了！

风云诶i

  

上面老哥的例子给你改了  一下  没问题的话分给他吧

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
分割结果	文本型		0
名称	文本型
i	整数型
ii	整数型
文本	文本型
倒找文本	整数型
新名称	文本型
对比名称	文本型

分割结果 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (超级列表框10.取表项数 (), i)
名称 ＝ 超级列表框10.取标题 (i － 1, 1)
计次循环首 (取数组成员数 (分割结果), ii)
文本 ＝ 分割结果 [ii]
如果真 (取文本长度 (名称) ≥ 取文本长度 (文本))  ' //如果寻找文本比列表中的文本长，那肯定就不是
对比名称 ＝ 取文本右边 (名称, 取文本长度 (文本))
如果真 (对比名称 ＝ 文本)
新名称 ＝ 取文本左边 (名称, 取文本长度 (名称) － 取文本长度 (文本))
超级列表框10.置标题 (i － 1, 1, 新名称)
跳出循环 ()


计次循环尾 ()
计次循环尾 ()

上面老哥的例子给你改了  一下  没问题的话分给他吧<br /> <br /> <br /> .版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 分割结果, 文本型, , "0"<br /> .局部变量 名称, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 ii, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 倒找文本, 整数型<br /> .局部变量 新名称, 文本型<br /> .局部变量 对比名称, 文本型<br /> <br /> 分割结果 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (超级列表框10.取表项数 (), i)<br />     名称 ＝ 超级列表框10.取标题 (i － 1, 1)<br />     .计次循环首 (取数组成员数 (分割结果), ii)<br />         文本 ＝ 分割结果 [ii]<br />         .如果真 (取文本长度 (名称) ≥ 取文本长度 (文本))  ' //如果寻找文本比列表中的文本长，那肯定就不是<br />             对比名称 ＝ 取文本右边 (名称, 取文本长度 (文本))<br />             .如果真 (对比名称 ＝ 文本)<br />                 新名称 ＝ 取文本左边 (名称, 取文本长度 (名称) － 取文本长度 (文本))<br />                 超级列表框10.置标题 (i － 1, 1, 新名称)<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()

风云诶i

倒找文本是从后面开始找 直到最前
你这个用 取文本右边() 吧

wangshiyuan

风云诶i 发表于 2020-2-14 18:01
倒找文本是从后面开始找 直到最前
你这个用 取文本右边() 吧

如果超级列表框标题中间文本和编辑框文本相同取文本右边也不行啊

风云诶i

wangshiyuan 发表于 2020-2-14 18:20
如果超级列表框标题中间文本和编辑框文本相同取文本右边也不行啊

意思是超级列表框的标题 最后几位  不能和编辑框中的一样吗？

wangshiyuan

风云诶i 发表于 2020-2-14 18:24
意思是超级列表框的标题 最后几位  不能和编辑框中的一样吗？

是的老师！多谢老师上次的帮忙！

山顶小雪球

首先回答你为什么会不一样也替换：
倒找文本是从最后一位往前找相同的文本，比如（A123456B）这一段文本那么我倒找（45）那么就会从B->6B->56->45。很明显被找的文本中有45这一段，那么就理所应当的找到了。而不是必须是45结尾才算是找到。

那么在说一下解决方法：
直接取出尾部文本对比判断

  

变量名	类 型	静态	数组	备 注
分割结果	文本型		0
名称	文本型
i	整数型
ii	整数型
文本	文本型
倒找文本	整数型
新名称	文本型
对比名称	文本型

分割结果 ＝ 分割文本 (编辑框1.内容, #换行符, )
计次循环首 (超级列表框10.取表项数 (), i)
名称 ＝ 超级列表框10.取标题 (i － 1, 1)
计次循环首 (取数组成员数 (分割结果), ii)
文本 ＝ 分割结果 [ii]
如果真 (取文本长度 (名称) ≥ 取文本长度 (文本))  ' //如果寻找文本比列表中的文本长，那肯定就不是
对比名称 ＝ 取文本右边 (名称, 取文本长度 (文本))
如果真 (对比名称 ＝ 文本)
新名称 ＝ 子文本替换 (名称, 文本, “”, , , 假)
超级列表框10.置标题 (i － 1, 1, 新名称)
跳出循环 ()


计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 分割结果, 文本型, , "0"<br /> .局部变量 名称, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 ii, 整数型<br /> .局部变量 文本, 文本型<br /> .局部变量 倒找文本, 整数型<br /> .局部变量 新名称, 文本型<br /> .局部变量 对比名称, 文本型<br /> <br /> 分割结果 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> .计次循环首 (超级列表框10.取表项数 (), i)<br />     名称 ＝ 超级列表框10.取标题 (i － 1, 1)<br />     .计次循环首 (取数组成员数 (分割结果), ii)<br />         文本 ＝ 分割结果 [ii]<br />         .如果真 (取文本长度 (名称) ≥ 取文本长度 (文本))  ' //如果寻找文本比列表中的文本长，那肯定就不是<br />             对比名称 ＝ 取文本右边 (名称, 取文本长度 (文本))<br />             .如果真 (对比名称 ＝ 文本)<br />                 新名称 ＝ 子文本替换 (名称, 文本, “”, , , 假)<br />                 超级列表框10.置标题 (i － 1, 1, 新名称)<br />                 跳出循环 ()<br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()

风云诶i

wangshiyuan 发表于 2020-2-14 18:25
是的老师！多谢老师上次的帮忙！

你直接QQ给我说吧