[VB.NETTips]创建匿名类型列表

  • Z时代
  • 2024-01-10
  • 分类：综合

编程

在调用一些Web API时经常要发送或接收一些数据，在构造Json时可能要创建一些类。

很多都是在调用相关方法才使用到这些类，那使用匿名类型是个不错的选择。如果要传些表结构数据时，就要创建List。

匿名类型创建List还是动一下脑筋的。直接上代码。

    '匿名类型事例
    Dim sample = New With {
                            .Name = "Teng",
                            Key .Sex = "男",                                 'Key关键字定义只读匿名类型成员
                            .Address = New Object(),
                            .Run = Function(ByRef x As Integer) As Integer   '定义匿名方法                                     
                                        Return x + 10
                                    End Function
                            }
    '创建匿名类型
    Dim obj = New With {
                        .PartNo = "20010C01",
                        .Qty = 200
                        }
    '基于这个匿名类型创建一个空的List
    Dim objList = CreateEmptyList(obj)
    'List中增加匿名类型
    objList.Add(obj)
    'List中增加匿名类型
    objList.Add(New With {.PartNo = "20010C02", .Qty = 300})
    'List中增加匿名类型
    objList.Add(New With {.PartNo = "20010D01", .Qty = 200})
    '创建空的List
    Public Function CreateEmptyList(Of T)(ByVal obj As T) As List(Of T)
        Dim NewList As New List(Of T)
        Return NewList
    End Function

以上是 [VB.NETTips]创建匿名类型列表 的全部内容， 来源链接： utcz.com/z/513403.html

回到顶部