Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
获取VB.net中JSON对象的值_Json_Vb.net - Fatal编程技术网

获取VB.net中JSON对象的值

获取VB.net中JSON对象的值,json,vb.net,Json,Vb.net,我在C#中使用了以下代码: 我只想知道代币的价值。在VB.NET中;) 试试这个: Dim tokenJson = JsonConvert.SerializeObject(tokenJsonString) Dim jsonResult = JsonConvert.DeserializeObject(Of Dictionary(Of String, Object))(jsonString) Dim firstItem = jsonResult.Item("data").Item(0) 干

我在C#中使用了以下代码:

我只想知道代币的价值。在VB.NET中;)

试试这个:

 Dim tokenJson = JsonConvert.SerializeObject(tokenJsonString)

 Dim jsonResult = JsonConvert.DeserializeObject(Of Dictionary(Of String, Object))(jsonString)
 Dim firstItem = jsonResult.Item("data").Item(0)

干杯

选择的awnser为您提供一行{“令牌”:“1edd6006-678a-4e6a-ab65-4fa60efa8632”} 遇到同样的问题,要准确获取令牌的值,可以执行以下操作:

Dim firstItem = jsonResult.Item("data").Item(0).Value(Of String)("token")
输出:“1edd6006-678a-4e6a-ab65-4fa60efa8632”

希望对您有所帮助

示例JSON:

{
  "fuits": [
    
  ],
  "vehicles": [
    {
      "cars": [
        {
          "skoda": "2Lacks",
          "maruti": 400000,
          "neon": "3 Lacks",
          
        },
        {
          
        }
      ]
    }
  }
如果要使用
JObject.Parse
访问上面示例json中
VB.NET
中的
skoda
值,请将其编写为:

Dim wallet As String = jsonobject("vehicles")(0)("cars")(0)("skoda").ToString()
现在您在
钱包中有
2个背包

{
  "fuits": [
    
  ],
  "vehicles": [
    {
      "cars": [
        {
          "skoda": "2Lacks",
          "maruti": 400000,
          "neon": "3 Lacks",
          
        },
        {
          
        }
      ]
    }
  }
Dim wallet As String = jsonobject("vehicles")(0)("cars")(0)("skoda").ToString()