以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  合计行放在最顶上  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142620)

--  作者:有点蓝
--  发布时间:2019/11/1 14:54:00
--  
参考:

Dim t As Table = Tables("销售单")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = True
g = New Subtotalgroup
g.GroupOn = "*"
g.TotalOn = "数量"
t.SubtotalGroups.Add(g)
t.Subtotal()