谁能帮我看一下程序？

Question

Data1.Recordset.FindFirst " Number= ' & mno & ' "
应为
Data1.Recordset.FindFirst "Number= '"& mno &"'"

Answer 1

如果为数值型则为:
  data1.recordset.findfirst "Number="& mno &"
如果为字符型则为:
  data1.recordset.findfirst "number='"& mno &"'"

Answer 2

源程序：
Private Sub Command5_Click()
    Dim mno As String
    mno = InputBox$("Please Input Number", "Find Window")
    Data1.Recordset.FindFirst "Number= '" & mno & "'"
    If Data1.Recordset.NoMatch Then MsgBox "There is not Number!", , "Note"
    
End Sub
为什么我无法实现查找的功能呀？