 |
SQL的SELECT语句提供了大量的统计函数,应该够用了。但是一次查询得到所有的统计数据是不可能,可能需要多次查询。因为不能将你要的统计结果写为一个SQL语句,所以不能使用数据绑定,只能使用OpenRecordset语句或者类似的语句。
最高/低分、平均分比较容易得到,如:
SELECT Max(分数), Min(分数), Avg(分数) FROM 语文
优秀人数、及格人数,需要加上条件,如:
SELECT Count(*) FROM 语文 WHERE 分数>= 60
例子:
Option Explicit
Dim db As Database
Dim rd As Recordset
Set db = OpenDatabase("my.mdb")
Set rd = dd.OpenRecordset("SELECT Count(*) FROM 语文 WHERE 分数>= 60", dbOpenDynaset)
MsgBox "语文及格人数为" + CStr(rd(0))
此问题由李海回答。
附加关键字:编程, 源程序, programming, source code, Visual Basic, VB, SQL查询, sql server, sql, query, select。
|