Foxtable(狐表)用户栏目专家坐堂 → 关于交叉统计


  共有3136人关注过本帖树形打印复制链接

主题:关于交叉统计

美女呀,离线,留言给我吧!
josieli
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:122 积分:859 威望:0 精华:0 注册:2012/8/27 9:42:00
关于交叉统计  发帖心情 Post By:2015/3/10 17:04:00 [只看该作者]

TABLE中可否在代码上保存一个以上的交叉统计表?我之前做的可以保存一个,下次打开就能看到,但是再做一个就不能保存

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/10 17:06:00 [只看该作者]

 拷贝代码贴到afteropenproject事件,生成时候的表名,改一下

 回到顶部
美女呀,离线,留言给我吧!
josieli
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:122 积分:859 威望:0 精华:0 注册:2012/8/27 9:42:00
  发帖心情 Post By: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”

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/18 14:33: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("统计表")


g = 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")


 回到顶部