如果要在窗口中的查询表(SQLquery)中做交叉统计,代码应该如何写,直接生成查询表的代码为:Dim q As new QueryBuilder
q.C
q.TableName = ("政治面貌")
q.Selectstring ="select * from (Select 工作部门,政治面貌,count(员工编号) 人数 from 员工档案表 group by 工作部门,政治面貌)b order by 人数 desc"
q.Build
Dim g As New CrossTableBuilder("政治面貌", DataTables("部门员工政治面貌"))
g.HGroups.AddDef("工作部门")
g.VGroups.AddDef("政治面貌")
g.Totals.AddDef("人数", "人数")
g.Build()
MainTable = Tables("政治面貌")
MainTable.Font = New Font("宋体",10,FontStyle.Regular)
Tables("政治面貌").AutoSizeCols()
另外,这个查询表出来以后没有统计列,统计列的代码又改如何写?
[此贴子已经被作者于2014-6-13 17:31:49编辑过]