主题：请教 老师 如何才能对筛选的结果进行 交叉统计 而不是整个表进行交叉统计。

老师 能给个例子吗？

 Tables("表1").Filter = " 第五列  >=  '"& ksrq.Value &"' and 第五列  <=  '"& jsrq.Value &"' "

Dim dt1 As fxDataSource
Dim g As New CrossTableBuilder("统计表1", DataTables("表1"))
g.HGroups.AddDef("第一列", "供 应 商")
g.VGroups.AddDef("第二列")
g.Totals.AddDef("第三列", "数量")
g.Totals.AddDef("第四列", "金额")
g. HorizontalTotal = True
g.Build()
dt1 = g. BuildDataSource()
Tables("窗口1_Table2").DataSource = dt1 '将统计结果绑定到Table