匿名型配列のキャスト
Sub Main()
Dim arr = MakeList(New With {.Name = "Karua"}, _
New With {.Name = "???"})
End SubFunction MakeList(Of T)(ByVal ParamArray items() As T) As IEnumerable(Of T)
Return items
End Function
Sub Main()
Dim arr = MakeList(New With {.Name = "Karua"}, _
New With {.Name = "???"})
End SubFunction MakeList(Of T)(ByVal ParamArray items() As T) As IEnumerable(Of T)
Return items
End Function