使用VB.net从中引用类

使用VB.net从中引用类,vb.net,initialization,Vb.net,Initialization,我调用了clientdetails,希望将其作为一个整体返回给JSONConvert方法,以便为JSON序列化 我创建了一个类,该类具有我需要的属性类型(TextA、TextB)等 我可以引用TransactionCount和TransactionType,因为它们是ClientDetails的一部分,但是当我尝试引用事务的TextA时,它会声明TextA不是ClientDetails的成员-我知道这就是我显式声明.Transactions.TextA的原因 如果我在一个新变量下单独声明事务,那

我调用了clientdetails,希望将其作为一个整体返回给JSONConvert方法,以便为JSON序列化

我创建了一个类,该类具有我需要的属性类型(TextA、TextB)等

我可以引用TransactionCount和TransactionType,因为它们是ClientDetails的一部分,但是当我尝试引用事务的TextA时,它会声明TextA不是ClientDetails的成员-我知道这就是我显式声明.Transactions.TextA的原因

如果我在一个新变量下单独声明事务,那么我可以引用它们,但是我需要在ClientDetails下声明它们,以便传递给序列化程序

有人能指出我做错了什么吗?还在学习

Public Class JSON

Public Shared Function SerializeObject()

    Dim clientdetails As New ClientDetails() With {.TransactionCount = "1", .TransactionType = "Q", .Transactions.TextA} 'Unable to Refer to any Property of Transactions.

    'Dim Trans As New Transactions()

    'Trans.TextA= "Test"

    Dim output As String = JsonConvert.SerializeObject(clientdetails, Newtonsoft.Json.Formatting.Indented)

    Return output
End Function

End Class

Public Class ClientDetails
Public Property Transactions As New Transactions()
Public Property [TransactionType] As String
Public Property [TransactionCount] As Integer
End Class

Public Class Transactions

Public Property [RecordID] As String
Public Property No As String
Public Property TextA As String
Public Property TextB As String
Public Property Initial As String
Public Property Flag As String
Public Property Sex As String
Public Property Area As String
Public Property Type As String
Public Property IDNO As String

End Class

您可以使用以下语法:

Dim clientdetails As New ClientDetails() With {.TransactionCount = "1", .TransactionType = "Q", .Transactions = New Transactions() With {.TextA = "Test"}}
或更可读的代码:

Dim trans As New Transactions
trans.TextA = "Test"

Dim clientDetails As New ClientDetails()

With clientDetails
    .TransactionCount = "1"
    .TransactionType = "Q"
    .Transactions = trans
End With

非常感激巴德,他知道我哪里出了问题。