Visual Basic - Find con ADO

Hola amigo:
Te molesto para preguntarte dónde está el error en éste fuente.
Tengo una MDB llamada Cajeros.mdb con dos campos llamados cajero_numero y cajero_nombre.
En un formulario tengo dos cajas de texto, una para ingresar el número (txtnumero.text) y otra para ingresar el nombre (txtnombre.text).
En el formulario tengo un componente ADO conectado a la Tabla y un DataGrid conectado al ADO y a los campos.
El problema que tengo es que quiero preguntar si ya existe el número de cajero para no duplicarlo, pero me dice siempre que NO .

'Botón Guardar
With Ado.Recordset
Ado.Recordset.MoveFirst
Ado.Recordset.Find "cajero_numero= str(txtnumero.text)"
Print Ado.Recordset.Fields("cajero_numero") 'imprimo este valor y es igual a
Print Str(txtnumero.Text) ' éste, pero ...........
If .EOF Then
MsgBox " SSSSSSSIIIIIIIII"
...................
Else
MsgBox " NNOOOOOOOOOOOOOO"
Ado.Recordset.Update
..........................
End If
End With

Desde ya muchas gracias y hasta la próxima.
Saludos
Horacio