VB6 ADODC的find方法出错的问题

Private Sub cmdfind_Click() '查找数据 
Dim str As String 
Dim mybookmark As Variant 
mybookmark = Adodc1.Recordset.Bookmark 
str = InputBox("输入查找表达式", "如年龄=9", "查找") 
Text2.Text = mybookmark 
Text3.Text = str 
If str = "" Then Exit Sub 
Adodc1.Recordset.MoveFirst 
Adodc1.Recordset.Find str 
If Adodc1.Recordset.EOF Then 
MsgBox "指定的条件没有匹配的记录", , "信息提示" 
Adodc1.Recordset.Bookmark = mybookmark 
End If 
End Sub 
当输入“年龄=9”之类的时候可以找到要找的数据，可是输入“姓名=XX”时候就显示参数类型不正确或不在可以接受的范围之内或与其它参数冲突。我把“XX”加上引号也不行的。 

哪位高手指点一下？ 

先检查有没有“姓名”这个字段，再这样试试：姓名='XX'