超级列表框导入

Nbwlyz一键验证

我想把指定txt里的数据按这种格式导入进超级列表框
自动分类  但是txt里的数据是杂乱的需要循环取才行，求个例子 txt待导入数据.rar (1.72 KB, 下载次数: 6)

2022-9-5 21:53 上传

点击文件名下载附件

zainex

换条 正则表达式 就可以了：

  

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

变量名	类 型	静态	数组	备 注
文本	文本型
正则	正则表达式
搜索结果	搜索结果		0
数	整数型

超级列表框1.全部删除 ()
文本 ＝ 到文本 (编码转换 (读入文件 (“文本.txt”), #编码_UTF_8, #编码_GB18030, ))
正则.创建 (“\[(U.+?)\](.+?).,.+?：.+?text.:.(.+?).,”, )
搜索结果 ＝ 正则.搜索全部 (文本)
计次循环首 (取数组成员数 (搜索结果), 数)
超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (数 － 1, 0, 搜索结果 [数].取子匹配文本 (文本, 1, ))
超级列表框1.置标题 (数 － 1, 1, 搜索结果 [数].取子匹配文本 (文本, 3, ))
超级列表框1.置标题 (数 － 1, 2, 搜索结果 [数].取子匹配文本 (文本, 2, ))
计次循环尾 ()

i支持库列表	支持库注释
RegEx	正则表达式支持库
iext	扩展界面支持库一
iconv	编码转换支持库

.版本 2<br /> .支持库 RegEx<br /> .支持库 iext<br /> .支持库 iconv<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型<br /> .局部变量 正则, 正则表达式<br /> .局部变量 搜索结果, 搜索结果, , "0"<br /> .局部变量 数, 整数型<br /> <br /> 超级列表框1.全部删除 ()<br /> 文本 ＝ 到文本 (编码转换 (读入文件 (“文本.txt”), #编码_UTF_8, #编码_GB18030, ))<br /> 正则.创建 (“\[(U.+?)\](.+?).,.+?：.+?text.:.(.+?).,”, )<br /> 搜索结果 ＝ 正则.搜索全部 (文本)<br /> .计次循环首 (取数组成员数 (搜索结果), 数)<br />     超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (数 － 1, 0, 搜索结果 [数].取子匹配文本 (文本, 1, ))<br />     超级列表框1.置标题 (数 － 1, 1, 搜索结果 [数].取子匹配文本 (文本, 3, ))<br />     超级列表框1.置标题 (数 － 1, 2, 搜索结果 [数].取子匹配文本 (文本, 2, ))<br /> .计次循环尾 ()

另外，你提供的文本里只有两条信息，所以，使用上面的代码也就只能获取这两条信息。

黑暗二次元

建议先看下数据结构去操作。先一行一行分出来再进行判断吧，

沉默不语！

不知道是不是你要的，如果解决请采纳


例程.zip (1.78 KB, 下载次数: 11)

2022-9-5 22:14 上传

点击文件名下载附件









补充内容 (2022-9-5 22:15):
直接拖动txt到超级列表框即可，没有做对话框导入