关于findfirst的用法access vba？

Question

在access中运行下面的代码，出现错误提示
Private Sub Command12_Click() Dim rs As DAO.Recordset Dim db As DAO.Database Dim Shu As Integer Set db = CurrentDb Set rs = db.OpenRecordset("table1") Shu = 40 rs.FindFirst "语文=" & Shu If rs.NoMatch Then MsgBox "无此记录" End IfEnd Sub

• 

• 
  

•