vb.net 对象转 json 字符串

以下是在VB.NET中将对象转换为JSON字符串的示例代码：

Imports Newtonsoft.Json

Public Class Person
    Public Property Name As String
    Public Property Age As Integer
End Class

Sub Main()
    Dim person As New Person With {
        .Name = "John",
        .Age = 30
    }
    Dim json As String = JsonConvert.SerializeObject(person)
    Console.WriteLine(json)
End Sub

在此示例中，我们定义了一个名为Person的类，该类具有Name和Age属性。我们创建了一个Person对象，并使用JsonConvert.SerializeObject方法将其序列化为JSON字符串。最后，我们将JSON字符串打印到控制台上。