如何在 VB.NET 中读取 JSON 文件

Question

我有一个 JSON 文件：

 {
 "items": [
  {
   "id": "HkWO1yuYnLU",
   "snippet": {
    "channelId": "UCR5wZcXtOUka8jTA57flzMg",
    "title": "?lyas Yalç?nta? - ?çimdeki Duman",
    "categoryId": "10"
   },
   "statistics": {
    "viewCount": "37266431",
    "likeCount": "122255",
    "dislikeCount": "4472",
    "favoriteCount": "0",
    "commentCount": "7151"
   }
  }
 ]
}

我想得到这个信息，像这样：

label1.text = "Rap GOD"  
label2.text = "122255 likes"

我该怎么做？

Answer 1

这是你可以做的...

1. 首先，下载JSON框架
2. 通过右键单击您的项目并添加引用来添加对您的项目的引用
3. 然后，浏览Newtonsoft.Json.dll（提取您在步骤 1 中下载的库）并从参考管理器窗口添加参考。

4. 添加此代码：

   Public Class Form1
   
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
      Dim json As String = "{""name"":""Rap God"",""statistics"":{""likeCount"":""122255"",""dislikeCount"":""4472""}}"
      Dim read = Newtonsoft.Json.Linq.JObject.Parse(json)
      TextBox1.Text = read.Item("name").ToString
      TextBox2.Text = read.Item("statistics")("likeCount").ToString + " " + " times"
   End Sub  
   
   End Class
   

而且，这是预期的输出：

而且，我希望上面的代码有所帮助。现在，您可以使用VB.NET轻松读取任何JSON文件。