给你一个程序,基本包含了你需要的全部内容,需要源文件给地址。
select count(*) as total from 表的名称 where 数学>65
select count(*) from 表名 where 数学>65
RS.OPEN "SELECT 数学 FROM 表名 WHERE 数学>65 ",connRS.RecordCount