E4A萌新类库源码分享

函数 JSON_取文本值(json文本 为 文本型,键名 为 文本型,是否为数值 为 逻辑型)为 文本型'利用正则语法根据json键名取出文本值,json文本 = 源文本, 键名 = 萌新编程助手内键名, 是否为数值 = 取出的是文本还是数值,真 = 数值 假=文本,
'返回取出的所有键名值,多个文本值用换行符分开
变量 表达式 为 文本型
变量 局_文本值 为 文本型
如果 是否为数值 = 真 则'取出的文本为数值
表达式 = "\"" & 键名 & "\" : (.*?),"
否则'取出的键名值=文本
表达式 = "\"" & 键名 & "\" : \"(.*?)\","
结束 如果
创建表达式(表达式,真,真)
开始匹配(json文本)
判断循环首 匹配下一个()
局_文本值 = 局_文本值 & 取子匹配文本(1) & "\n"
判断循环尾
JSON_取文本值 = 局_文本值
结束 函数