提取文本文件内容进行匹配并插入的问题

wh1234567

求个问题如下：
超级列表框1里有很多行，点击按钮1需要自动把AA.txt文本文件里的内容根据第一组数据和超级列表框第2列内容匹配是否一致，如果内容相同则把该文本文件行后面的2组分别插入到超级列表框对应行的第6、7列里。
AA.txt文本文件里内容格式如下：每行都有2个/作为分割符分成3组。
8757885545634/hgfhvbcvb范甘迪发/合家欢08754700
供货方/更好供货方规划/3432344898778版本
风风光光/回顾机会/不女不女......

也就是逐行读取超级列表框1的第2列内容与文件里的第一组内容进行匹配，如果一样则把文本该行后面2组分别插入到超级列表框对应行的第6、7列。
求例子。

mytiger

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
行文本	文本型		0
i	整数型
文本	文本型		0
索引	整数型

行文本 ＝ 分割文本 (到文本 (读入文件 (“D:\Users\Administrator\Desktop\AA.txt”)), #换行符, )
计次循环首 (取数组成员数 (行文本), i)
文本 ＝ 分割文本 (行文本 [i], “/”, )
如果真 (取数组成员数 (文本) ＝ 3)
索引 ＝ 超级列表框1.查找表项 (文本 [1], , 真, 2)
如果真 (索引 ≠ -1)
超级列表框1.置标题 (索引, 6, 文本 [2])
超级列表框1.置标题 (索引, 7, 文本 [3])


计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 行文本, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 文本, 文本型, , "0"<br /> .局部变量 索引, 整数型<br /> <br /> 行文本 ＝ 分割文本 (到文本 (读入文件 (“D:\Users\Administrator\Desktop\AA.txt”)), #换行符, )<br /> .计次循环首 (取数组成员数 (行文本), i)<br />     文本 ＝ 分割文本 (行文本 <i>, “/”, )<br />     .如果真 (取数组成员数 (文本) ＝ 3)<br />         索引 ＝ 超级列表框1.查找表项 (文本 [1], , 真, 2)<br />         .如果真 (索引 ≠ -1)<br />             超级列表框1.置标题 (索引, 6, 文本 [2])<br />             超级列表框1.置标题 (索引, 7, 文本 [3])<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

mytiger

  

行文本 ＝ 分割文本 (到文本 (读入文件 (文件路径)), #换行符, )
计次循环首 (取数组成员数 (行文本), i)
文本 ＝ 分割文本 (行文本, “/”, )
如果真 (取数组成员数 (文本) ＝ 3)
索引 ＝ 超级列表框1.查找表项 (文本 [1], , 真, 2)
如果真 (索引 ≠ -1)
超级列表框1.置标题 (索引, 6, 文本 [2])
超级列表框1.置标题 (索引, 7, 文本 [3])


计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> 行文本 ＝ 分割文本 (到文本 (读入文件 (文件路径)), #换行符, )<br /> .计次循环首 (取数组成员数 (行文本), i)<br />     文本 ＝ 分割文本 (行文本, “/”, )<br />     .如果真 (取数组成员数 (文本) ＝ 3)<br />         索引 ＝ 超级列表框1.查找表项 (文本 [1], , 真, 2)<br />         .如果真 (索引 ≠ -1)<br />             超级列表框1.置标题 (索引, 6, 文本 [2])<br />             超级列表框1.置标题 (索引, 7, 文本 [3])<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()

wh1234567

mytiger 发表于 2024-1-15 09:48
[e=0].版本 2
.支持库 iext

如何判断超级列表框1是否在最顶层？

mytiger

可以设置最顶层,如何判断我不清楚.

wh1234567

mytiger 发表于 2024-1-15 09:48
[e=0].版本 2
.支持库 iext

老师您发完整源码，

wh1234567

mytiger 发表于 2024-1-15 10:39
可以设置最顶层,如何判断我不清楚.

设置最顶层 怎么写？

mytiger

wh1234567 发表于 2024-1-15 10:46
设置最顶层 怎么写？

上面就是完整的源码

超级列表框1.调整层次 ()
参数<1>的名称为“欲调整到的层次”，类型为“整数型（int）”，可以被省略。可以为以下常量之一： 1、#顶层； 2、#底层； 3、#最高层； 4、#次高层。如果被省略，默认为“#顶层”。

wh1234567

mytiger 发表于 2024-1-15 10:52
上面就是完整的源码

超级列表框1.调整层次 ()

我意思是包括变量名等完整的

wh1234567

mytiger 发表于 2024-1-15 10:52
上面就是完整的源码

超级列表框1.调整层次 ()

判断超级列表框1是否在第一层，是不是用 如果真（超级列表框1.调整层次 (#顶层)=真）这样行不行？