以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  本表数据变更后指定表自动计算  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=131057)
--  作者：zhuxinhui
--  发布时间：2019/2/15 10:48:00
--  本表数据变更后指定表自动计算
Select Case e.DataCol.Name
     Case  "收入","支出","客户","项目"
       Dim dr As DataRow = DataTables("表B").DataRows
       dr("收款_定金") = DataTables("表A").Compute("sum(收入)","dr(客户) =\'" &  e.DataRow("客户") & "\'and [项目]="定金"")
End  Select
现在想在表A收入、支出、客户、项目四列其中一列发生改变后，表B自动进行计算变更，老提示代码出错 ，Dim dr As DataRow = DataTables("表B").DataRows提示错误
--  作者：有点甜
--  发布时间：2019/2/15 11:23:00
--  

看看这里

 

http://www.foxtable.com/webhelp/scr/1472.htm

 
--  作者：zhuxinhui
--  发布时间：2019/2/16 12:41:00
--  
只有是用代码重置列了