主题：主子表 用fiter 实施联动 发现子表金额变化了 主表为0

主子表 用fiter 实施联动 发现子表金额变化了 主表为0 代码如下

If e.DataCol.Name = "数量"  OrElse e.DataCol.Name = "单价" OrElse e.DataCol.Name = "金额"  Then
    e.DataRow("金额") =e.DataRow("数量")*e.DataRow("单价")
    Tables("销售单").Current("金额") = Tables("销售单明细").Compute("sum(金额)")
    Tables("销售单").Current("数量") = Tables("销售单明细").Compute("sum(数量)")
End If
If Forms("销售单").opened()
    vars("ljs")=Tables("销售单").current("数量")
    Forms("销售单").Controls("Label8").text=cumoney(vars("ljs"))+"   小写: " & vars("ljs")
End If
 帮助看一下