以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  Subtotal 汇总下,标题不显示  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=121800)

--  作者:furan
--  发布时间:2018/7/13 10:36:00
--  Subtotal 汇总下,标题不显示
Dim tbName As String = e.Form.Name & "_Table1"
Dim t As Table = Tables(tbName)
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.TreeVisible = True
t.GroupAboveData = True

g = New Subtotalgroup 
g.Aggregate = AggregateEnum.Sum 
g.GroupOn = "项目名称" 
g.TotalOn = "装车次数,装车费" 
g.Caption = "{0} 小计" 
t.SubtotalGroups.Add(g) 
\'
\'定义总计分组
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*" 
g.TotalOn = "装车次数,装车费" 
g.Caption = "总计"
t.SubtotalGroups.Add(g)
t.Subtotal() \'生成汇总模式

小计和总计并不会显示


--  作者:有点甜
--  发布时间:2018/7/13 10:39:00
--  

你表格的第一列是什么类型?不能是数值类型。


--  作者:有点甜
--  发布时间:2018/7/13 10:39:00
--  

或者,可以编写代码设置标题

 

http://www.foxtable.com/webhelp/scr/1964.htm