各位高手，编译下面这段程序时，说有3077号错误syntax error(missing operator) in expression,请各位指教！！

Question

错误指示该语句：Data1.Recordset.FindFirst MyNumber

Answer 1

MyNumber = "学号＝'" & MyNumber & "'"应为：
MyNumber = "学号='" & MyNumber & "'"
学号后面的等号有错。

Answer 2

Public Sub Initial_Button()
 If Data1.Recordset.RecordCount = 0 Then
   Command1.Enabled = False
   Command2.Enabled = True
   Command3.Enabled = False
   Command4.Enabled = False
   Command5.Enabled = False
   Command6.Enabled = True
 Else
   Command1.Enabled = True
   Command2.Enabled = True
   Command3.Enabled = True
   Command4.Enabled = False
   Command5.Enabled = False
   Command6.Enabled = True
End If
End Sub

Answer 3

编译时，上面的出错
method or data member not found
请赐教！！