关于类_json的问题，加成员并读取成员

萌新坏猫

我有多个超级列表框，并且每个超级列表框都有好几个表头，并且还有大图标列表框，我想通过json来保存数据，启动软件的时候通过json来读取数据，现在只会用置属性和取通用属性来读取和保存数据，这样要是重名的太多，那么名字不够用了，所以我需要把每个超级列表框同意到一起。这样尽管重名也不会影响太多数据。
所以大佬能不能给个读写的代码


为什么不用精益模块的   外部超级列表框_保存数据(, , , , )  超级列表框1.表项=xxx
其一是每个文件只能保存一个超级列表框，好几个超级列表框就得保存好几个文件
其二是大图标模式只有表项，没有子项，想保存数据还得给他一个专门的超级列表框，特别麻烦。我在读取大图标列表框可以直接json获取数据多好。

为什么用json来保存，因为这样的话，我只需要一个文件就可以保存所有的数据，而且貌似JSON读取速度也快一点，还有xml，网上xml教程太少了。头大。。

易智趣吖

你想把多个超级列表框数据整合到一个josn工作量会比较大，你可以使用AI来写json易语言的数据结构，然后用易语言助手测试，

萌新坏猫

没大佬嘛！！

萌新坏猫

易智趣吖 发表于 2025-8-3 20:50
你想把多个超级列表框数据整合到一个josn工作量会比较大，你可以使用AI来写json易语言的数据结构，然后用易 ...

deepseek写的。我在研究！！！

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
json	类_json

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

保存超级列表框数据到JSON ()

子程序名	返回值类型	公开	备 注
保存超级列表框数据到JSON

.局部变量 列表框名称, 文本型
.局部变量 行数, 整数型
.局部变量 列数, 整数型
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 表项文本, 文本型
.局部变量 json文件路径, 文本型

' 创建JSON对象
json.清除 ()

' 获取超级列表框名称作为第一级目录
列表框名称 ＝ 超级列表框1.取窗口标题 ()

' 开始构造JSON结构
json.置属性 ("[ ' " ＋ 列表框名称 ＋ "']", "{}", 真)

' 获取超级列表框的行数和列数
行数 ＝ 超级列表框1.取表项数 ()
列数 ＝ 超级列表框1.取列数 ()

' 遍历所有行
计次循环首 (行数, i)
' 为每一行创建一个对象
json.置属性 ("[ ' " ＋ 列表框名称 ＋ "']['行" ＋ 到文本 (i － 1) ＋ "']", "{}", 真)

' 遍历所有列
计次循环首 (列数, j)
表项文本 ＝ 超级列表框1.取标题 (i － 1, j － 1)
' 添加列数据，使用列标题作为键名
json.置属性 ("[ ' " ＋ 列表框名称 ＋ "']['行" ＋ 到文本 (i － 1) ＋ "']['" ＋ 超级列表框1.取列标题 (j － 1) ＋ "']", 表项文本, )
计次循环尾 ()
计次循环尾 ()

' 获取JSON字符串
json文件路径 ＝ 取运行目录 () ＋ "\超级列表框数据.json"

' 保存到文件
写到文件 (json文件路径, 到字节集 (json.取数据文本 ()))

调试输出 ("数据已保存到：" ＋ json文件路径)

' 显示JSON内容（可选）
编辑框1.内容 ＝ json.取数据文本 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 json, 类_json<br /> <br /> .子程序 _按钮_保存_被单击<br />     保存超级列表框数据到JSON()<br />     <br /> .子程序 保存超级列表框数据到JSON<br />     .局部变量 列表框名称, 文本型<br />     .局部变量 行数, 整数型<br />     .局部变量 列数, 整数型<br />     .局部变量 i, 整数型<br />     .局部变量 j, 整数型<br />     .局部变量 表项文本, 文本型<br />     .局部变量 json文件路径, 文本型<br />     <br />     ' 创建JSON对象<br />     json.清除 ()<br />     <br />     ' 获取超级列表框名称作为第一级目录<br />     列表框名称 ＝ 超级列表框1.取窗口标题 ()<br />     <br />     ' 开始构造JSON结构<br />     json.置属性 ("['" ＋ 列表框名称 ＋ "']", "{}", 真)<br />     <br />     ' 获取超级列表框的行数和列数<br />     行数 ＝ 超级列表框1.取表项数 ()<br />     列数 ＝ 超级列表框1.取列数 ()<br />     <br />     ' 遍历所有行<br />     .计次循环首 (行数, i)<br />         ' 为每一行创建一个对象<br />         json.置属性 ("['" ＋ 列表框名称 ＋ "']['行" ＋ 到文本 (i － 1) ＋ "']", "{}", 真)<br />         <br />         ' 遍历所有列<br />         .计次循环首 (列数, j)<br />             表项文本 ＝ 超级列表框1.取标题 (i － 1, j － 1)<br />             ' 添加列数据，使用列标题作为键名<br />             json.置属性 ("['" ＋ 列表框名称 ＋ "']['行" ＋ 到文本 (i － 1) ＋ "']['" ＋ 超级列表框1.取列标题 (j － 1) ＋ "']", 表项文本, )<br />         .计次循环尾 ()<br />     .计次循环尾 ()<br />     <br />     ' 获取JSON字符串<br />     json文件路径 ＝ 取运行目录 () ＋ "\超级列表框数据.json"<br />     <br />     ' 保存到文件<br />     写到文件 (json文件路径, 到字节集 (json.取数据文本 ()))<br />     <br />     调试输出 ("数据已保存到：" ＋ json文件路径)<br />     <br />     ' 显示JSON内容（可选）<br />     编辑框1.内容 ＝ json.取数据文本 ()

易智趣吖

因为AI并不懂易语言的一些模块命令，都是拷贝的其他主流编程语言写法，所有有时候复制AI的代码跑不起来。建议你先通过AI来写你需要的json数据结构。再根据你的数据结构，来写子程序尝试写入，读取。如果AI不清楚你用的命令，你就把你要调用模块类复制丢给AI告诉他 按这个模块来写读写子程序，效果会好很多。