以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]datatables的comput  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90236)

--  作者:陈嘉淳
--  发布时间:2016/9/8 10:44:00
--  [求助]datatables的comput
怎么在表格某行某列的数据更该时统计该行之前所有行的数据
--  作者:有点蓝
--  发布时间:2016/9/8 10:54:00
--  
参考:http://www.foxtable.com/webhelp/scr/1572.htm

Select Case e.DataCol.Name
    Case "收入","支出"
        Dim Val1 As Double = e.DataTable.Compute("Sum(收入)","[_SortKey] < " & e.DataRow("_SortKey"))
        Dim Val2 As Double = e.DataTable.Compute("Sum(支出)","[_SortKey] < " & e.DataRow("_SortKey"))
        e.DataRow("余额") = Val1 - Val2
End Select