以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码转换  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49199)

--  作者:老有所乐
--  发布时间:2014/4/14 9:50:00
--  代码转换
请帮忙将统计表的DataColChanged事件代码转换成按钮代码,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.table


--  作者:Bin
--  发布时间:2014/4/14 9:57:00
--  
For Each dr As DataRow In DataTables("统计表").DataRows
    
    dr("金额") = DataTables("表B").Compute("Sum(金额)", "收支 = \'" & dr("收支") & "\' And  分类= \'" & dr("分类") & "\' ") + DataTables("表A").Compute("Sum(收入)", "收支 = \'" & dr("收支") & " \' And  分类= \'" & dr("分类") & "\'")
    dr("记录数") = DataTables("表B").Compute("count(金额)", "收支 = \'" & dr("收支") & "\' And  分类= \'" & dr("分类") & "\' ") + DataTables("表A").Compute("count(收入)", "收支 = \'" & dr("收支") & " \' And  分类= \'" & dr("分类") & "\' ")
Next

--  作者:老有所乐
--  发布时间:2014/4/15 8:38:00
--  
谢谢Bim版主,另外,我加了日期条件,就统计不了,再帮忙看看,谢谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.table



--  作者:Bin
--  发布时间:2014/4/15 9:05:00
--  
.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.table


--  作者:老有所乐
--  发布时间:2014/4/15 9:29:00
--  
谢谢Bim版主!!!