主题：关于json问题的请教

 老师

   我的json 内容请看附件:  代码如下:

   

Dim s1 As String = UrlDecode(s)
Dim jo As JObject = JObject.Parse(s1)
Output.Show(jo("ddh").ToString)
Output.show(jo("ddlr").ToString)
For Each jt As JToken In jo("ddlr")
    Output.Show(jt("_Identify"))
Next

结果如下:

-1

[{"_Identify":"-1","产品名称":"CAD","产品数量":"80","产品销售价":"260","MID":"14453","库存入库编号":"37393"},{"_Identify":"-2","产品名称":"
GL","产品数量":"6000","产品销售价":"7.3","MID":"14492","库存入库编号":"37224"}]

但后面就没反应了,也不会报错. 要如何才能解析出里面的明细?

   

 老师,

看了论坛的例子,我已经会了.多谢!