以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]主窗口统计问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106540)

--  作者:heyufu038
--  发布时间:2017/9/11 11:15:00
--  [求助]主窗口统计问题
    Dim Sum As Integer
    Sum = DataTables("订单明细") .Compute("Sum(金额)")
    Forms("主窗口2").Controls("Label4").text ="    累计: " & Cstr(sum) & " "

比如我现在要统计筛选后金额 代码怎么写啊  以上只能显示整个TABLE的统计 求大神指点
图片点击可在新窗口打开查看此主题相关图片如下:1333-3.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/9/11 11:31:00
--  
    Dim Sum As Integer
    Sum = Tables("订单明细") .Compute("Sum(金额)")
    Forms("主窗口2").Controls("Label4").text ="    累计: " & Cstr(sum) & " "
 
或者
 
    Dim Sum As Integer
    Sum = DataTables("订单明细") .Compute("Sum(金额)", Tables("订单明细").Filter)
    Forms("主窗口2").Controls("Label4").text ="    累计: " & Cstr(sum) & " "

--  作者:heyufu038
--  发布时间:2017/9/11 11:46:00
--  
第一种方法我发之前就试过没用   现在试了第二种也没用 是不是我 放的事件有问题 ?  我放的是窗口AfterLoad事件中的
--  作者:有点甜
--  发布时间:2017/9/11 11:48:00
--  

你可以写在表格AfterFilter事件

 

也可以写在窗口timertick事件 http://www.foxtable.com/webhelp/scr/1301.htm

 


--  作者:heyufu038
--  发布时间:2017/9/11 11:53:00
--  
额 非常感谢大神