主题：[求助]统计问题不知如何写代码求大侠帮忙指导？

三列，姓名、证书、等级

 

红色代码的空格去掉

 

Dim q As new QueryBuilder
q.TableName = "统计"
q.SelectString = "select a.姓名, 证书 fr om {表C} as a inner join (Select 姓名, min(等级) as 等级 fr om {表C}  where 姓名 is not null group by 姓名) as b on a.姓名=b.姓名 and a.等级=b.等级"
q.Build
MainTable = Tables("统计")

直接用Fill方法

 

http://www.foxtable.com/help/topics/2912.htm

 

你的是内部数据源还是外部数据源？如果是外部，你要指定名字

 

Tables("窗口1_Table1").Fill("Select * F rom {客户} Where 地区 = '华北'","nwnd",True)

Tables("窗口1_Table1").Fill("Select a.姓名, 证书 fr om {表C} as a inner join (Select 姓名, min(证书) as 等级 fr om {表C} where 姓名 is not null group by 姓名) as b on a.姓名=b.姓名 and a.证书=b.等级",True)

 

或者

 

Tables("窗口1_Table1").Fill("Select a.姓名, 证书 fr om {表C} as a inner join (Select 姓名, min(证书) as 证书 fr om {表C} where 姓名 is not null group by 姓名) as b on a.姓名=b.姓名 and a.证书=b.证书",True)

 不能这样写，编写sql语句的话，表，必须是数据库里面真实存在的表。