有两张完全相同的表A和B,现在需要将A表的数据导入到B表中,请教下那种导入模式会效率些。且不会出错:以下是我写的代码,但是不效率,求一个效率点方法Dim t As Table = Tables("A")
Dim t1 As Table = Tables("B")
For Each r As DataRow In DataTables("A").Select("核算月份 = '201805'")
Dim r1 As Row = Tables("B").addnew
'Dim s As String
'Dim s1 As String
For Each c As Col In Tables("A").Cols
t1.Current(c.name ) = r(c.name )
Next
Next
[此贴子已经被作者于2018/7/2 15:13:31编辑过]