以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于分组汇总和总计问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=153444)

--  作者:fvcfox
--  发布时间:2020/8/11 10:59:00
--  关于分组汇总和总计问题
Dim g As New Subtotalgroup \'定义一个新的分组
g.GroupOn = "父项目" \'分组列为客户列
g.TotalOn = "支出数合计,年初预算,预算调整合计,调整后预算" \'对数量和金额进行统计
Dim t As Table = Tables("主窗口_table1")
t.SubtotalGroups.Add(g)
t.Sort = "列号,父项目" \'指定排序字段
t.Subtotal(True) \'生成汇总模式

以上可以实现分组和排序,怎样实现在再增加一行总计

--  作者:有点蓝
--  发布时间:2020/8/11 11:24:00
--  
参考:http://www.foxtable.com/webhelp/topics/3290.htm