以文本方式查看主题

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

--  作者:81538475
--  发布时间:2020/10/27 19:22:00
--  [求助]排序的问题
请问下汇总模式可以排序吗? 目前一排序就没有统计数据了。
Dim t As Table = Tables("统计表3")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.Sort= "项目组归属,合计 DESC"   ‘--这个好像没有效果
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "项目组归属"
g.TotalOn = "合计,合计gdr"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)

g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "合计,合计gdr"
g.Caption = "总计"
t.SubtotalGroups.Add(g)

t.Subtotal()

--  作者:有点蓝
--  发布时间:2020/10/27 20:11:00
--  
参考:http://www.foxtable.com/webhelp/topics/3297.htm