如何将数据行复制到新的数据表中？ - VB.Net

Question

我正在尝试将 DataRow 复制到新的 DataTable 中，然后在 GridView 中显示它，但我一直遇到问题。

Dim r As DataRow() = dt.Select("MacID = 'A06'")

Dim dt2 As DataTable
dt2.ImportRow(r) 'this is where problem begins

GridView2.DataSource = dt2
GridView2.DataBind()

DataRow 来自另一个 DataTable，当我将鼠标悬停在问题行时，它显示

Value of type '1-dimensional array of System.Data.DataRow' cannot be converted to 'System.Data.DataRow'

在我的一生中，我不知道这意味着什么，也不知道这是否正确（可能不是）。请帮忙...

编辑 1： 在 jmcilhinney 的回复之后，我尝试了他的第二个代码，因为有多行。但我的代码有一些问题：

Dim dt2 as DataTable

Dim rows = dt.Select("MacID = 'A06'")

        For Each row In rows
            dt2.ImportRow(row) 'Problem shown here
        Next

        GridView2.DataSource = dt2
        GridView2.DataBind()

当我再次将鼠标悬停在它上面时，错误提示：

Variable 'dt2' is used before it has been assigned a value.
A null reference exception could result at runtime.

Answer 1

DataTable.Select 方法返回匹配行的数组，而不是单行。 ImportRow 将只导入一行。问题的具体解决方案取决于您要达到的目标。

如果您尝试按键查找单行，则应调用Rows.Find 而不是Select，例如

Dim row = sourceTable.Rows.Find(keyValue)

If row IsNot Nothing
    destinationTable.ImportRow(row)
End If

如果可能有多个匹配项，则使用Select，但您必须循环遍历结果数组，例如

Dim rows = sourceTable.Select(filterExpression)

For Each row In rows
    destinationTable.ImportRow(row)
Next

也就是说，你真的需要另一个DataTable 吗？你能不能只在现有的DataTable 上创建一个DataView，例如

Dim view As New DataView(sourceTable,
                         filterExpression,
                         Nothing,
                         DataViewRowState.CurrentRows)

DataView 可以绑定到任何DataTable 可以绑定的位置，事实上，当您绑定DataTable 时，数据实际上来自DefaultView 属性，即DataView 类型。