时间戳

首页 > 解决方案 > 如何使用 json.net 在 Visual Basic 中创建 JSON 字符串？

json.net - 如何使用 json.net 在 Visual Basic 中创建 JSON 字符串？

问题描述

我正在使用 json.net 来解析 JSON 文本。我JObject现在有一个： 

Dim json_text As String
json_text = "{" & Chr(34) & "Venue" & Chr(34) & ": {" & Chr(34) & "ID" & Chr(34) & ":" & Chr(34) & "JSON" & Chr(34) & "}}"
Console.WriteLine(json_text)
Dim json As JObject
json = JObject.Parse(json_text)
Console.WriteLine(json.SelectToken("Venue").SelectToken("ID"))

现在我想做相反的事情并从 JSON 变量创建一个 JSON 文本。

不幸的是，我找不到任何解决方案。

标签： json.net

解决方案

    Imports Newtonsoft.Json.Linq
    Imports Newtonsoft.Json

    Dim json_text As String
    json_text = "{" & Chr(34) & "Venue" & Chr(34) & ": {" & Chr(34) & "ID" & Chr(34) & ":" & Chr(34) & "JSON" & Chr(34) & "}}"
    Console.WriteLine(json_text)
    Dim json As JObject
    json = JObject.Parse(json_text)
    Console.WriteLine(json.SelectToken("Venue").SelectToken("ID"))

    Dim json_string As String = JsonConvert.SerializeObject(json,
                   Formatting.Indented, New JsonSerializerSettings())

    Console.WriteLine(json_string)

这导致：

{"Venue": {"ID":"JSON"}}
JSON
{
  "Venue": {
    "ID": "JSON"
  }
}

推荐阅读