主题：表连接数据刷新问题

看不懂你的描述，看不懂你的逻辑，请单独做个实例发上来，说明操作步骤，说明要实现的功能。

参考代码

If e.DataCol.Name = "编码" OrElse e.DataCol.name = "金额" Then
    Dim t As Table = e.Form.controls("Table4").Table
    If e.DataRow("编码")<>Nothing AndAlso e.DataRow("金额")<>Nothing Then
        Dim fdr As DataRow = t.DataTable.Find("编号 = '" & e.DataRow("编码") & "'")
        If fdr IsNot Nothing Then
            fdr("剩余金额") -= e.DataRow("金额")
        End If
    End If
End If

4楼代码没问题。 你输入编码后，输入金额，就会对应减去table4的代码。请认真测试。

或者你截图说明测试步骤。

测试没问题，你肯定有其它代码影响。

请上传具体例子说明。

没看懂你到底想做什么。就你的实例说明你要做的东西。把有问题的实例发上来说明问题。

你datacolchanged事件，是根据证书编号find的啊。

1、datacolchanged事件，find没问题，扣减肯定没问题，你可以先不刷新看效果；

2、刷新之前，请先保存table4，再刷新；

3、请就你上传的实例，说明你的问题，我测试没问题。