2

下面是我的 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"))
                   }

如何将值从“JoinedResult”复制到数据表？

笔记：

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

1 回答 1

3

CopyToDataTable自 .NET 3.5 以来就已经存在。但问题是您想DataTable从匿名类型“从头开始”创建。那是行不通的。

CopyToDataTable只是一个扩展IEnumerable<DataRow>。因此，您要么必须从已加入的选项中选择一个 ：DataRowDataTables

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呢？您还可以将匿名类型用作 DataSource 或创建一个自定义类，您可以从查询结果中对其进行初始化。

编辑：您还可以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
于 2013-01-29T08:10:13.030 回答