主题：[求助]如何用代码在同一表里复制多行？

比如

Dim drs = DataTables("表A").Select("")
For Each dr As DataRow In drs
    Dim ndr = dr.DataTable.addnew
    ndr("第一列") = dr("第一列")
    ndr("第二列") = dr("第二列")
    ndr("第三列") = dr("第三列")
    ndr("第四列") = 2019
Next