取数组加入超级列表框

zyx4444

求高手帮我写个demo，小弟感激不尽

zainex

使用正则, 不需要模块:

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

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

文本 ＝ 到文本 (编码转换 (读入文件 (“新建文本文档 3.txt”), #编码_UTF_8, #编码_GB18030, ))
' 调试输出 (文本)
正则.创建 (“\{.id.:.(.+?).,.visitorId.:.(.+?).,.ruku_time.:.(.+?).\}”, )
搜索结果 ＝ 正则.搜索全部 (文本)
' 调试输出 (取数组成员数 (搜索结果))
计次循环首 (取数组成员数 (搜索结果), 数)
成员 [1] ＝ 搜索结果 [数].取子匹配文本 (文本, 1, )
成员 [2] ＝ 搜索结果 [数].取子匹配文本 (文本, 2, )
成员 [3] ＝ 搜索结果 [数].取子匹配文本 (文本, 3, )
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 成员 [1])
超级列表框1.置标题 (索引, 1, 成员 [2])
超级列表框1.置标题 (索引, 2, 成员 [3])
计次循环尾 ()

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

.版本 2<br /> .支持库 RegEx<br /> .支持库 iconv<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 正则, 正则表达式<br /> .局部变量 搜索结果, 搜索结果, , "0"<br /> .局部变量 数, 整数型<br /> .局部变量 成员, 文本型, , "3"<br /> .局部变量 索引, 整数型<br /> <br /> 文本 ＝ 到文本 (编码转换 (读入文件 (“新建文本文档 3.txt”), #编码_UTF_8, #编码_GB18030, ))<br /> ' 调试输出 (文本)<br /> 正则.创建 (“\{.id.:.(.+?).,.visitorId.:.(.+?).,.ruku_time.:.(.+?).\}”, )<br /> 搜索结果 ＝ 正则.搜索全部 (文本)<br /> ' 调试输出 (取数组成员数 (搜索结果))<br /> .计次循环首 (取数组成员数 (搜索结果), 数)<br />     成员 [1] ＝ 搜索结果 [数].取子匹配文本 (文本, 1, )<br />     成员 [2] ＝ 搜索结果 [数].取子匹配文本 (文本, 2, )<br />     成员 [3] ＝ 搜索结果 [数].取子匹配文本 (文本, 3, )<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     超级列表框1.置标题 (索引, 0, 成员 [1])<br />     超级列表框1.置标题 (索引, 1, 成员 [2])<br />     超级列表框1.置标题 (索引, 2, 成员 [3])<br /> .计次循环尾 ()

例子.zip (4.58 KB, 下载次数: 5)

2025-8-21 12:56 上传

点击文件名下载附件

熬夜

111.e (935.13 KB, 下载次数: 6)

2025-8-21 12:45 上传

点击文件名下载附件

熬夜

  

子程序名	返回值类型	公开	备 注
批量json数据
参数名	类 型	参考	可空	数组	备 注
内容1111	文本型

变量名	类 型	静态	数组	备 注
Json	类_json
i1	整数型
匹配表项	整数型

Json.解析 (内容1111)
计次循环首 (Json.成员数 (“data”), i1)
匹配表项 ＝ 超级列表框2.插入表项 (, , , , , )
超级列表框2.置标题 (匹配表项, 1, Json.取通用属性 (“data[” ＋ 到文本 (i1 － 1) ＋ “].id”))  ' 转化后时间'1990-1-1 17:00:00
超级列表框2.置标题 (匹配表项, 2, Json.取通用属性 (“data[” ＋ 到文本 (i1 － 1) ＋ “].visitorId”))  ' 时间戳
超级列表框2.置标题 (匹配表项, 3, Json.取通用属性 (“data[” ＋ 到文本 (i1 － 1) ＋ “]['ruku_time']”))  ' 时间戳
超级列表框2.置标题 (匹配表项, 0, 到文本 (i1))
处理事件 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 批量json数据<br /> .参数 内容1111, 文本型<br /> .局部变量 Json, 类_json<br /> .局部变量 i1, 整数型<br /> .局部变量 匹配表项, 整数型<br /> <br /> <br /> Json.解析 (内容1111)<br /> <br /> .计次循环首 (Json.成员数 (“data”), i1)<br />     匹配表项 ＝ 超级列表框2.插入表项 (, , , , , )<br /> <br /> <br />     超级列表框2.置标题 (匹配表项, 1, Json.取通用属性 (“data[” ＋ 到文本 (i1 － 1) ＋ “].id”))  ' 转化后时间'1990-1-1 17:00:00<br />     超级列表框2.置标题 (匹配表项, 2, Json.取通用属性 (“data[” ＋ 到文本 (i1 － 1) ＋ “].visitorId”))  ' 时间戳<br />     超级列表框2.置标题 (匹配表项, 3, Json.取通用属性 (“data[” ＋ 到文本 (i1 － 1) ＋ “]['ruku_time']”))  ' 时间戳<br />     超级列表框2.置标题 (匹配表项, 0, 到文本 (i1))<br />     处理事件 ()<br /> .计次循环尾 ()

小样别致

.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 json, 类_json
.程序集变量 成员数, 整数型
.程序集变量 i, 整数型

.子程序 __启动窗口_创建完毕

json.解析 (#常量1)
成员数 ＝ json.成员数 (“data”)
.计次循环首 (成员数, i)
    编辑框1.加入文本 (json.取属性 (“data[” ＋ 到文本 (i － 1) ＋ “]”).取数据文本 () ＋ #换行符)





.计次循环尾 ()