共5 条记录, 每页显示 10 条, 页签: [1]

标题：询问交叉统计

1楼

游山玩水 发表于：2011/12/25 22:48:00

请问，我在一个“加油记录”表中，如果先筛选数据，再利用菜单中的交叉统计，得到的交叉表是筛选以后的统计结果，但是我把交叉统计设置里的代码复制后，添加到一个按钮的代码后，生成的交叉表却不是筛选以后的数据，而是所有的数据的交叉统计结果，这是为什么啊？

这个是自动生成的代码：

Dim g As New CrossTableBuilder("统计表1", DataTables("加油记录"))
g.HGroups.AddDef("车号")
g.VGroups.AddDef("规格")
g.Totals.AddDef("数量", "数量")
g.Totals.AddDef("金额", "金额")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Build()
MainTable = Tables("统计表1")

2楼

yangming 发表于：2011/12/25 22:54:00

在点按钮前要先筛选

3楼

游山玩水 发表于：2011/12/25 23:04:00

以下是引用yangming在2011-12-25 22:54:00的发言：
在点按钮前要先筛选

谢谢杨版，不过先筛选也没有用，我原来是点筛选按钮后，再点交叉统计按钮，现在我把筛选按钮的代码也加在交叉统计的代码前面，依旧没有用。

4楼

czy 发表于：2011/12/25 23:33:00

5楼

游山玩水 发表于：2011/12/25 23:40:00

以下是引用czy在2011-12-25 23:33:00的发言：
Dim g As New CrossTableBuilder("统计表1", DataTables("加油记录"))
g.HGroups.AddDef("车号")
g.VGroups.AddDef("规格")
g.Totals.AddDef("数量", "数量")
g.Totals.AddDef("金额", "金额")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Filter = Tables("加油记录").Filter
g.Build()
MainTable = Tables("统计表1")

现在可以了，非常感谢！

共5 条记录, 每页显示 10 条, 页签: [1]