在vb.net中使用LINQ将类对象转换为datarow。

Question

我有一个类对象列表。我有一个数据表以及创建的列。我需要将列表中的所有数据插入到数据表中。我无法在vb.net中获得LINQ。

我为每个循环使用a做了同样的事情，但我正在寻找LINQ代码。

示例代码

Private Function ToDataTable(ByVal sampleData As List(Of ClassA))

    'data table  
        Dim dt As New DataTable

    'add columns
        Dim column As DataColumn       
        column = New DataColumn("Name")
        dt.Columns.Add(column)
        column = New DataColumn("Country")
        dt.Columns.Add(column)

    'insert rows in data table
        For Each data As ClassA In sampleData 
                dr = dt.NewRow()              
                dr(0) = data.Name
                dr(1) = data.Country
                dt.Rows.Add(dr)
        Next

End Function