以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]关于代码设置汇总模式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85683)
--  作者：lesliecheung912
--  发布时间：2016/5/31 17:26:00
--  [求助]关于代码设置汇总模式
例子：

Dim t As Table = Tables("订单")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True
g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "日期"
g.TotalOn = "数量,金额"
g.Caption = "{0}月 小计"
g.DateGroup = DateGroupEnum.Month
t.SubtotalGroups.Add(g)
t.Subtotal()


g.TotalOn这个条件是填的列的名字，这个例子的列的名字是固定的，

那么如果这个列的名字不是固定的应该如何填写？

比如列名就是窗口的控件名：e.Form.Controls("年份").text
--  作者：大红袍
--  发布时间：2016/5/31 17:30:00
--  
g.TotalOn = "数量,金额," & e.Form.Controls("年份").text
--  作者：lesliecheung912
--  发布时间：2016/5/31 17:36:00
--  
感谢！