我想创建一个匿名类型的列表,例如:
Dim lineItem = New With {.Name = myFile(index).Last_Name & "," & myFile(index).First_Name,_ .StartDate = myFile(index).Day,.EndDate = myFile(index).Day}
我创建了这个匿名类型.现在我想将它添加到该类型的列表中.如何声明该类型的列表?
这是一种从单一匿名类型创建匿名类型列表的方便方法.
Public Function CreateListFromSingle(Of T)(ByVal p1 As T) As List(Of T) Dim list As New List(Of T) list.Add(p1) return List End Function
现在您可以执行以下操作
Dim list = CreateListFromSingle(dsResource)
EDIT OP希望在创建元素之前创建列表.
有两种方法可以做到这一点.您可以使用以下代码创建一个空列表.它与hacky接口,因为你传递的参数你不打算使用,但它的工作原理.
Public Function CreateEmptyList(Of T)(ByVal unused As T) As List(Of T) Return New List(Of T)() End Function Dim x = CreateEmptyList(New With { .Name = String.Empty,.ID = 42 })