在 VB.NET 中序列化 JSON

Question

我想通过套接字发送 JSON 消息。

如何序列化我的消息？ VB.NET 中是否有等效于 JSON.stringify 的东西？

这是我的 function 通过套接字与服务器建立连接。

Public Sub SendCommand(Command As String)
    Dim SocketClient As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
    Dim EP As New IPEndPoint(IPAddress.Parse("127.0.0.1"), 5000)
    Try
        SocketClient.Connect(EP)
        Dim Mess As Byte() = System.Text.Encoding.UTF8.GetBytes(Command)
        SocketClient.Send(Mess)
        SocketClient.Close()
    Catch ex As Exception
        ' Error
    End Try
End Sub

我的 JSON 消息的键包含连字符。

SendCommand("{""my-key1"":""myvalue1"",""my-key2"":""myvalue2"",""my-key3"":""myvalue3""}")

我没有机会集成新的库，例如 Json.NET。

感谢帮助，我是初学者。

Answer 1

使用 JSON 消息的键作为变量创建 Class。 如果您有一个嵌套的 JSON，则创建另一个 JSON 作为 class 中的“对象”类型变量存在的键。

创建上面创建的 Class 的 object 并使用NewtonSoft.Json对其进行序列化。

参考链接： https://www.newtonsoft.com/json/help/html/SerializingJSON.htm

NewtonSoft.Json是用于 JSON 活动的开源库 in.Net (VB & C#)。