关于DataColChanged代码有时不执行的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

现在有2个表，主表是zcmain, 子表是zcsub. 子表的金额统计后放在主表里。

在子表的DataColChanged 放了下面的代码：

If Tables("zcsub").Current("预支金额") IsNot Nothing Then

Tables("zcmain").Current("预支金额") = Tables("zcsub").Compute("sum(预支金额)","支出单号 = '" & Tables("zcmain").Current("支出单号") & "'")

End If

If Tables("zcsub").Current("付款金额") IsNot Nothing Then

Tables("zcmain").Current("付款金额") = Tables("zcsub").Compute("sum(付款金额)","支出单号 = '" & Tables("zcmain").Current("支出单号") & "'")

End If

If Tables("zcsub").Current("正常报销金额") IsNot Nothing Then

Tables("zcmain").Current("正常报销金额") = Tables("zcsub").Compute("sum(正常报销金额)","支出单号 = '" & Tables("zcmain").Current("支出单号") & "'")

End If

If Tables("zcsub").Current("冲账报销金额") IsNot Nothing Then

Tables("zcmain").Current("冲账报销金额") = Tables("zcsub").Compute("sum(冲账报销金额)","支出单号 = '" & Tables("zcmain").Current("支出单号") & "'")

End If

做了2个界面，一个是新增，一个是修改。如附件。

现在的问题是，在新增的界面不执行上述代码，新增的数据保存后，用修改的界面打开后，这段代码就能执行。

不知道是什么原因。麻烦老师指点下，谢谢！

此主题相关图片如下：2.png

此主题相关图片如下：1.png

[此贴子已经被作者于2017/4/20 10:40:12编辑过]

主题：关于DataColChanged代码有时不执行的问题