Option Explicit

Dim db As Database
Dim rs As Recordset

Private Sub Form_Load()
Set db = OpenDatabase(App.Path + "\学生成绩管理表.mdb")
Set rs = db.OpenRecordset("学生成绩表")
End Sub

Private Sub Command1_Click()
Dim strQuery As String
dim i as integer
strQuery = "班级 = " & "'" & 2 & "'"

rs.FindFirst strQuery
i=rs.AbsolutePosition

End Sub
每次运行时总会针对“rs.FindFirst strQuery
i=rs.AbsolutePosition

”跳出“这种对象不支持该操作”错误提示？
请高手解答我的问题？

如果是ADO我就不问了，我就是想用DAO。看看它到底有什么功能与data控件、ADO控件之间区别在实际实现功能上。
我上面的代码主要是用DAO实现查询功能？可是总是报错。

你的书上怎么说？请你写出来？
我手上的书没有说明如何处理此错误？
我是完全照书上写的操作，可还是出错？不知到错在那里十分困惑？
请高手指出。

我只想知道如何才能让DAO对象实现查询功能？如何引用DAO对象的 rs.AbsolutePosition？
请高人解答下。
如果我写错了，请你指出。我不胜感激！！！

使用sql语句可以解决此问题