我用Foxtable自带的示例文件,测试没问题的:
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "Select * From {订单}"
dt = cmd.ExecuteReader()
Dim b As New CrossTableBuilder("统计表1", dt)
b.HGroups.AddDef("客户")
b.VGroups.AddDef("产品","产品_{0}")
b.Totals.AddDef("数量")
b.Build '生成统计表
MainTable = Tables("统计表1")
应该是列名出错。
[此贴子已经被作者于2011-5-29 9:45:43编辑过]