[求助]如何用代码生成交叉表查询

阿丰

请教用代码生成交叉表查询的方法，有无具体例子？

竹笛

dim strSQL as string
dim qdf as QueryDef

strSQL = "SELECT * from tblaa" 'tblaa为表
Set qdf = CurrentDb.CreateQueryDef("创建的查询", strSQL)
DoCmd.OpenQuery qdf.Name

将SQL语句改为交叉表的语句即可。

阿丰

关键是如何将SQL语句改为交叉表的语句，能否具体点？在下先谢了。

ADAM

用查詢設計向導做一個交叉查詢表,
然后檢視SQL語句就可以了嗎....
就不用自已寫交叉查詢的SQL語句,

阿丰

第4楼楼主说得太好了，我已试过，谢谢第2楼及第4楼。

[此贴子已经被作者于2003-10-13 22:20:16编辑过]