以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  汇总模式筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72368)

--  作者:一笑
--  发布时间:2015/7/29 11:20:00
--  汇总模式筛选
设置汇总模式时如何按照一定条件进行筛选后汇总,谢谢

Dim Filter As String = “选择 = true”
Dim t As Table = Tables("出票")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "备注"
g.TotalOn = "票价,税价"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)
t.Subtotal()

--  作者:有点蓝
--  发布时间:2015/7/29 11:27:00
--  
t.Filter = Filter