Dim json As String = rawresp
Dim jsonObject As Newtonsoft.Json.Linq.JObject = Newtonsoft.Json.Linq.JObject.Parse(json)
For Each item As JObject In jsonArray
textboxLast.Text = item.SelectToken("id").ToString
Next
,JSON是:
{"id": "546546","name": "Msallem Hamadi","address": "street airport"}
我想将546546提取到textboxLast.Text,但是没有输出,也没有错误。
答案 0 :(得分:3)
您的JSON不代表数组,因此这里不需要循环。
如果您尝试提取id
值,则只需执行以下操作:
textboxLast.Text = CStr(jsonObject("id"))