以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  分组统计问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=78252)
--  作者：HJG_HB950207
--  发布时间：2015/12/5 10:23:00
--  分组统计问题
用分组统计生存的代码做窗口按钮，对刚改过的表计算不生效，重新启动FOXTABLE后才生效，请老师指教是啥原因，谢谢啊。
按钮代码为：
MainTable = Tables("职工一览表")
Dim g As New CrossTableBuilder("岗位", DataTables("职工一览表"))
g.HGroups.AddDef("科室")
g.VGroups.AddDef("现岗位")
g.Totals.AddDef("姓名", AggregateEnum.Count, "人数")
g.OrderByTotal = True
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 0
g.Subtotal = True
g.FromServer = True
g.Build()
MainTable = Tables("岗位")
For Each c As Col In Tables("岗位").Cols
    c.Width = 60
Next
--  作者：Hyphen
--  发布时间：2015/12/5 10:40:00
--  
修改原始数据后要保存，然后重新调用这段代码
--  作者：HJG_HB950207
--  发布时间：2015/12/5 10:55:00
--  
谢谢！