以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于交叉统计 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65175) |
-- 作者:josieli -- 发布时间:2015/3/10 17:04:00 -- 关于交叉统计 TABLE中可否在代码上保存一个以上的交叉统计表?我之前做的可以保存一个,下次打开就能看到,但是再做一个就不能保存 |
-- 作者:有点甜 -- 发布时间:2015/3/10 17:06:00 -- 拷贝代码贴到afteropenproject事件,生成时候的表名,改一下 |
-- 作者:josieli -- 发布时间:2015/3/18 14:22:00 -- 我的意思是打开项目的时候两个交叉统计表都可以看到,在事件中增加了语句 Dim g As New CrossTableBuilder("统计表", DataTables("费用明细")) g.HGroups.AddDef("Dep") g.HGroups.AddDef("AN") g.VGroups.AddDef("Date", "{0}月") g.Totals.AddDef("Expence", "Expence") g.Build() MainTable = Tables("统计表") Dim g As New CrossTableBuilder("统计表1", DataTables("PA")) g.HGroups.AddDef("SN") g.VGroups.AddDef("Date", "{0}月") g.Totals.AddDef("P800", "P800") g.Totals.AddDef("P100", "P100") g.Totals.AddDef("P700", "P700") g.Totals.AddDef("P900", "P900") g.Totals.AddDef("P200", "P200") g.Totals.AddDef("P300", "P300") g.Totals.AddDef("P3002", "P3002") g.Totals.AddDef("P600", "P600") g.Totals.AddDef("P6002", "P6002") g.Totals.AddDef("P1100", "P1100") g.Totals.AddDef("P500", "P500") g.Totals.AddDef("PO", "PO") g.Build() MainTable = Tables("统计表1") 提示错误:当前块中已 声明了局部变量“g”
|
-- 作者:有点甜 -- 发布时间:2015/3/18 14:33:00 -- Dim g As New CrossTableBuilder("统计表", DataTables("费用明细"))
|