以文本方式查看主题

-  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=180160)

--  作者:wohenguaia
--  发布时间:2022/10/1 10:18:00
--  如何获取json的键名
Dim json As String = "{\'name\':\'李云龙\',\'age\':\'36\'}"
如何获取name,age呢?

--  作者:hongsejiyi
--  发布时间:2022/10/1 20:10:00
--  
Dim json As String = "{\'name\':\'李云龙\',\'age\':\'36\'}"
Dim jo As JObject = JObject.Parse(json)
For Each obj As object In jo
        Output.Show(obj.key & obj.value)
Next