VB+ACC 怎么选择输出成绩

来源:百度知道 编辑:UC知道 时间:2024/06/05 11:30:03
学生成绩管理系统 课程设计,我都快做完了,还差一个不及格学生名单的输出
谁能告诉我怎么做啊

先引用 : Microsoft Activex Data Objects 2.1 Library

Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\mydb.mdb"
SQL="Select * From [表名] Where 学科名<60"
Rs.Open SQL,Conn,1,3
Print "XXX学科不及格的同学名单有:"
While Not Rs.Eof
Print Rs("学生姓名")
Rs.MoveNext
Wend