Question

我已经定义了这样的结构：

Private Structure udtString2
    Dim String1 As String
    Dim String2 As String
End Structure

现在我想用值填充udtString2的列表，我想以一种方便，结构良好且易于阅读的方式进行填充。

我想问一下是否可以做这样的事情？

Dim n As New List(Of udtString2)

'Pseudocode

n.Add(udtString2("TextA1", "TextA2"))
n.Add(udtString2("TextB1", "TextB2"))

或者，如果还有其他任何可以像这样清楚地看到它。

Answer 1

为您的结构定义构造函数：

Private Structure udtString2
    Dim String1 As String
    Dim String2 As String

    Public Sub New (s1 as String, s2 As String)
        String1 = s1
        String2 = s2
    End Sub
End Structure

然后你几乎可以按照自己的方式使用它：

n.Add(new udtString2("TextA1", "TextA2"))
n.Add(new udtString2("TextB1", "TextB2"))

Answer 2

你可以试试这个：

n.Add(New udtString2() With { .String1 = "TextA1", .String2 = "TextB1" })
...
...
...

此外，您可以使用集合初始值设定项使其更紧凑，而不是随后调用n.Add。

将结构添加到结构列表的便捷方式

2 个答案: