|  | 
  
| 本帖最后由 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]) )    计次循环尾 ()    计次循环尾 ()
 
 
 
 
 | 
 
  评分
查看全部评分
 |