主题：[求助]表B中合并数据，表A会增加相应记录，但表A分页加载时会出现错误，如何避免

save一下即可

       If e.DataRow.Isnull("编号")  = False
            Dim dr As DataRow
            dr = DataTables("表A").SQLFind("[编号] = '" & e.DataRow("编号") & "'" )      '表A编号不允许重复
            If dr Is Nothing Then
                dr = DataTables("表A").AddNew()
                dr("编号") = e.DataRow("编号")
            End If
            dr("姓名") = e.DataRow("姓名")
        End If

       dr.Save

重新打开项目测试。

If e.DataRow.Isnull("编号")  = False
    Dim dr As DataRow
    dr = DataTables("表A").SQLFind("[编号] = '" & e.DataRow("编号") & "'" )      '表A编号不允许重复
    If dr Is Nothing Then
        dr = DataTables("表A").AddNew()
        dr("编号") = e.DataRow("编号")
    End If
    dr("姓名") = e.DataRow("姓名")
    dr.Save
End If

参考10楼代码。你说的效率指什么？单独修改一行没问题的啊。

你重置列？

1、直接修改保存有没有问题？

2、不赋值 性别、出生日期，是否有问题？