主题：[求助]两表间数据更新及对比

这么强大！

请问，放到哪个事件中啊？

 你可以做一个窗口，弄一个按钮。

 

 http://www.foxtable.com/help/topics/0698.htm

 

那公式算出来的结果是错误的！能不用sql吗？直接代码实现

 肯定正确。比较前先保存数据。

猛啊

版主sql 太麻烦了，能变成代码吗？

 什么麻烦？保存数据直接用代码 Datatables.save

For Each dr As DataRow In DataTables("表C").Select("编码 is not null")
    Dim fdr As DataRow = DataTables("表A").Find("编码 = '" & dr("编码") & "'")
    If fdr IsNot Nothing Then
        Dim ndr As DataRow = DataTables("表B").AddNew
        ndr("编码") = dr("编码")
        ndr("第四列") = val(dr("第四列")) - val(fdr("第四列"))
        ndr("第五列") = val(dr("第五列")) - val(fdr("第五列"))
    End If
Next
MainTable = Tables("表B")