|
本帖最后由 gengqixuan 于 2019-11-18 07:06 编辑
本人一直找寻稳定的json解析,一理通百理用,E2EE就有这种功能,既方便又快速。
还犹豫什么,赶紧下载吧,妈妈再也不用担心json解析了
这是本人亲自测试写出来的,绝无第二份。
不喜勿喷,出门往左转,本源码只为小白做参考
回复免精币
下载地址:https://lanzoux.com/i7fa7ih
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_窗口1 | | | | 变量名 | 类 型 | 数组 | 备 注 | 键值表 | 存取键值表 | | 列表 | 存取列表 | | 主键数组 | 文本型 | 0 | 主键数组1 | 文本型 | 0 | 主键数组2 | 文本型 | 0 | 返回文本 | 存取键值表 | | 返回文本1 | 存取键值表 | | text | 文本型 | | n | 整数型 | | i | 整数型 | | k | 整数型 | | l | 整数型 | |
键值表. 从JSON载入 (编辑框_对象类型_列表.内容, , )主键数组 = 键值表. 取键数组 () 计次循环首 (取数组成员数 (主键数组 ), i ) 如果真 (键值表. 取类型 (主键数组 ) = #存取类型_存取键值表 ) 键值表. 取键值表 (主键数组 , 返回文本 )主键数组1 = 返回文本. 取键数组 ()计次循环首 (取数组成员数 (主键数组1 ), n ) 如果真 (返回文本. 取类型 (主键数组1 [n ]) = #存取类型_存取列表 ) 输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 )返回文本. 取列表 (主键数组1 [n ], 列表 )输出调试文本 (主键数组 + “.” + 主键数组1 [n ] + “ 值 --->> ” + 列表. 到JSON (假, , ), “ 成员数量 --->>> ” + 到文本 (列表. 取数量 ()) )输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 ) 计次循环首 (列表. 取数量 (), k )输出调试文本 (“成员类型 --->>> ” + 到文本 (列表. 取类型 (k, )) )输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 ) 如果真 (列表. 取类型 (k, ) = #存取类型_存取键值表 ) 列表. 取键值表 (“//[” + 到文本 (k ) + “]”, 返回文本1 )主键数组2 = 返回文本1. 取键数组 ()计次循环首 (取数组成员数 (主键数组2 ), l )输出调试文本 (主键数组 + “.” + 主键数组1 [n ] + “ 的数据:” + 返回文本1. 取文本 (主键数组2 [l ])) 计次循环尾 ()计次循环尾 ()输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 )如果真 (返回文本. 取类型 (主键数组1 [n ]) = #存取类型_长整数型 )输出调试文本 (主键数组 + “.” + 主键数组1 [n ] + “ 值 --->> ” + 返回文本. 取文本 (主键数组1 [n ]) + “ 或 ” + 到文本 (返回文本. 取长整数 (主键数组1 [n ])) )输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 )计次循环尾 ()如果真 (键值表. 取类型 (主键数组 ) = #存取类型_存取列表 ) 键值表. 取列表 (主键数组 , 列表 )输出调试文本 (列表. 取数量 ()) 输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 )如果真 (键值表. 取类型 (主键数组 ) = #存取类型_文本型 ) 输出调试文本 (“1、 ” + 主键数组 + “ 【文本型】 数据 ----->>>> 结果:” + 键值表. 取文本 (主键数组 )) 输出调试文本 (“--------------------------------------------------------------------------------------------” + #换行符 )计次循环尾 ()键值表. 从JSON载入 (编辑框_对象类型_列表.内容, , )编辑框_对象类型_列表.内容 = 键值表. 到JSON (真, , )键值表. 清空 ()列表. 从JSON载入 (编辑框_数组.内容, , )编辑框_数组.内容 = 列表. 到JSON (真, , )列表. 清空 ()列表. 从JSON载入 (编辑框_数组.内容, , )计次循环首 (列表. 取数量 (), i )如果真 (列表. 取类型 (i, ) = #存取类型_存取键值表 ) 列表. 取键值表 (“//[” + 到文本 (i ) + “]”, 返回文本 )主键数组 = 返回文本. 取键数组 ()计次循环首 (取数组成员数 (主键数组 ), n )调试输出 (主键数组 [n ] + “:” + 返回文本. 取文本 (主键数组 [n ])) 计次循环尾 ()计次循环尾 ()
|
-
评分
-
查看全部评分
|