示例七
SQLJoinTableBuilder也可以进行简单的分组统计。
用AddCols增加列时,可以将最后一个参数设置为True,以表示添加的是分组列。
用AddExp增加表达式列时,可以将最后一个参数设置为True,以表示添加的是分组列。
例如按年统计各客户订购每种产品的数量和金额:
Dim jb As New SQLJoinTableBuilder("查询表1","订单")
jb.ConnectionName = "Sale"
jb.AddTable("订单","产品ID","产品","产品ID")
jb.AddTable("订单","客户ID","客户","客户ID")
jb.AddExp("年","Year(日期)",True)
jb.AddCols("产品名称","客户名称",True)
jb.AddExp("数量","Sum(数量)")
jb.AddExp("金额","Sum(数量 * 单价)")
jb.Build()
MainTable = Tables("查询表1")