VB.net VB序列化JSON属性名称问题_Json_Vb.net

VB.net VB序列化JSON属性名称问题

json vb.net

VB.net VB序列化JSON属性名称问题,json,vb.net,Json,Vb.net,我对JSON属性名有问题。可能是因为我不知道自己在做什么。这是我第一次尝试序列化JSON（使用vb.net vb）我想要的结果是： { "login": { "username": "XXX", "password": "pwxXXxx", "busId": "123456789", "busRole": "Third Party", "paymentTerms": "Prepaid" } } 这就是我得到的： [ {

我对JSON属性名有问题。可能是因为我不知道自己在做什么。这是我第一次尝试序列化JSON（使用vb.net vb）

我想要的结果是：

{
  "login": {
    "username": "XXX",
    "password": "pwxXXxx",
    "busId": "123456789",
    "busRole": "Third Party",
    "paymentTerms": "Prepaid"
  }
}

这就是我得到的：

[
    {
        "login": null,
        "username": "1234",
        "password": "pw123456",
        "busId": "12345",
        "busRole": "Third Party",
        "paymentTerms": "Prepaid"
    }
]

我的问题是“login”：{“添加了冒号和null。我将在下面发布我的代码任何帮助都将不胜感激

-多谢各位

Partial Class _Default
        Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
        Dim loads As New List(Of fgtload)()

        loads.Add(New fgtload() With {
        .username = "1234",
        .password = "pw123456",
        .busId = "12345",
        .busRole = "Third Party",
        .paymentTerms = "Prepaid"
         }
        )
        Dim strserialize As String = JsonConvert.SerializeObject(loads)
        lblserial.Text = strserialize
End Sub


Public Class fgtload

    <JsonProperty(PropertyName:="login")>
    Public Property login As String

    Public Property username() As String
        Get
            Return m_username
        End Get
        Set
            m_username = Value
        End Set
    End Property
    Private m_username As String

    Public Property password() As String
        Get
            Return m_password
        End Get
        Set
            m_password = Value
        End Set
    End Property
    Private m_password As String

    Public Property busId() As String
        Get
            Return m_busId
        End Get
        Set
            m_busId = Value
        End Set
    End Property
    Private m_busId As String

    Public Property busRole() As String
        Get
            Return m_busRole
        End Get
        Set
            m_busRole = Value
        End Set
    End Property
    Private m_busRole As String


    Public Property paymentTerms() As String
        Get
            Return m_paymentTerms
        End Get
        Set
            m_paymentTerms = Value
        End Set
    End Property
    Private m_paymentTerms As String
End Class

如何向包装器添加另一个类

Public Class fgtDetails  ' 
    Public ServiceClass As String
    Public typeQuery As String
    Public pickupDate As Integer
    Public productCode As String
End Class

从我所看到的情况来看，您试图将login元素声明为空字符串，因此序列化为null。根据您所说的尝试实现，您希望将login声明为包含用户名、密码、BusID、BusRole和PaymentTerms属性的对象

从您要查找的内容来看，Login属性是一个对象，但您将其声明为字符串。此外，您正在创建一个列表并对其进行序列化，这将导致JSON周围的方括号（[，]）。方括号标记数组或枚举，而在示例JSON中，您只查找一个对象

最后一个技巧是，对于用于序列化的类，您不必使用属性。您可以将变量声明为公共变量。您需要使用属性的唯一时间是在设置或读取时是否需要修改或处理其内容。例如，在设置字符串时格式化字符串，或计算响应在检索变量时使用nse（您可以将代码放入GET和SET方法中，使它们像函数一样工作）

序列化和反序列化需要注意的是，您可以嵌套类。序列化后，它们将使用相同的对象布局和变量名转换为JSON对象。因此，您可以尝试以下操作：

（更新代码）

这就产生了这种反应。（最新产出）

希望这有帮助

（更新说明）：

为了响应您的评论，我修改了响应中的代码，以允许或更新您的预期输出

还要注意，如果两个JSON对象具有相同的结构（在本例中为originLocation和destinationLocation），则可以使用相同的类

此外，请参见商品数据中的方括号，这表示一个JSON数组。代码中的数组/列表/枚举将序列化为JSON数组，即使它们是类类型。因此，在本代码示例中，您可以根据需要向ListOfCommodities.Commodity添加任意数量的商品，并将它们正确序列化为JSON。