无法将 LINQ 结果复制到数据表中

Question

下面是我的LINQ查询：

Dim JoinedResult = From t1 In temp.AsEnumerable() _
                   Group Join t2 In tbCity.AsEnumerable() _
                   On t1.Field(Of String)("City") Equals t2.Field(Of String)("city_name") _
                   Into RightTableResults = Group _
                   From t In RightTableResults.DefaultIfEmpty
                   Select New With 
                   {
                        .ID = t1.Item("ID"), 
                        .CID = If(t Is Nothing, 
                        1,  
                        t.Item("city_gid"))
                   }  

如何将值从"连接结果"复制到数据表？

注意：

1. 我没有得到JoinedResult.CopyToDataTable()
2. 我不想使用循环

Answer 1

CopyToDataTable 自 .NET 3.5 以来已经存在。但问题是您希望从匿名类型"从头开始"创建一个DataTable。那行不通。

CopyToDataTable 是仅适用于IEnumerable<DataRow>的扩展。因此，您必须从联DataTables中选择一个DataRow：

Dim query =  From t1 In temp.AsEnumerable() _
             Group Join t2 In tbCity.AsEnumerable() _
             On t1.Field(Of String)("City") Equals t2.Field(Of String)("city_name") Into RightTableResults = Group 
             From t In RightTableResults.DefaultIfEmpty
             Select t1
Dim table = query.CopyToDataTable()

或者使用这个使用反射的ObjectShredder，因此不是最有效的方法（C# 实现）。

除此之外，您为什么还需要DataTable？还可以使用匿名类型作为数据源，或创建一个可以从查询结果初始化的自定义类。

编辑：您还可以使用所需的列创建自定义DataTable，例如（来自您的评论）：

Dim tbTemp As New DataTable
tbTemp.Columns.Add("ID")
tbTemp.Columns.Add("CID")
Dim query = From t1 In temp.AsEnumerable()
            Group Join t2 In tbCity.AsEnumerable() On
            t1.Field(Of String)("City") Equals t2.Field(Of String)("city_name")
            Into RightTableResults = Group
            From t In RightTableResults.DefaultIfEmpty
            Select New With {.ID = t1.Item("ID"), .City_Gid = t.Item("city_gid")}
For Each x In query
    tbTemp.Rows.Add(x.ID, x.City_Gid)
Next