Dim
Dt1, Dt2
as
DataTable
'
两个DataTable的赋值过程
Dim Dr as DataRow() = Dt1.Select()
For I as Integer = 0 To Dr.Length - 1
' 这样就把Dt1 合并到Dt2中了
Dt2.ImportRow(Dr(I))
Next
![dot.gif](/Images/dot.gif)
![dot.gif](/Images/dot.gif)
Dim Dr as DataRow() = Dt1.Select()
For I as Integer = 0 To Dr.Length - 1
' 这样就把Dt1 合并到Dt2中了
Dt2.ImportRow(Dr(I))
Next