以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  json解析求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=124426)

--  作者:bobolan521
--  发布时间:2018/9/6 9:25:00
--  json解析求助
已解决好
[此贴子已经被作者于2018/9/6 9:47:12编辑过]

--  作者:有点甜
--  发布时间:2018/9/6 9:50:00
--  
Dim str = ClipBoard.GetText
Dim json = JObject.parse(str)
For Each jo As object In json
    msgbox(jo.name)
    msgbox(json(jo.name)("title"))
Next