Visual Basic - Buscar, Grabar datos con ADO Data Control 6.0

Hola,

Encontre algunas respuestas de cómo buscar y grabar datos por medio del ADO, pero NINGUNA ME FUNCIONA.
Tengo una Base de Datos en Access 2000, la cual la quiero modificar por medio de un programa en Visual Basic 6.0, Pongo en una caja de texto un Numero y quiero que busque ese numero en la Base y si esta que me ponga la informacion y sino que me permita agregarla y grabarla a la base de datos y TODO POR MEDIO DEL ADO.

En el momento en que pongo:

ADODC1.RECORDSET.FIND \\\"Numero = \\\" txtNumero.Text
Numero es string (cuenta con numeros y letras)

me pone: Error 91....

Podría alguien decirme en donde encuentro ejemplos funcionales de lo que necesito hacer???

Gracias y Saludos...

prueba con sentencias SQL
ejm:
data1.recordsource=("select * from tabla where numero =" text1.text)

Yo te mandare ejemplos para trabajar con este control, espera mi correo amigo mio. Por el momento te dire que al usar find debe tener en consideracion que tipo de dato vas buscar.
1.-Si es texto
2.-Si es numero
3.-Si es Fecha
ESo varia mucho. Te enviare un correo. Abel

no me funciona la grabar odbc con access

Private Sub Form_Load()
Dim SQL As String
frmMain.prgBar1.Max = 5 'timer will go for seconds
frmMain.prgBar1.Visible = True
Move (Screen.Width - Width) 2, (Screen.Height - Height) 3
lblFecha.Caption = Format(Date, "dd/mmm/yyyy")
lblHora.Caption = Format(Time, "hh:mm:ss AMPM")
Set wrkJet = CreateWorkspace("", "admin", "", dbUseJet)
Set DB = wrkJet.OpenDatabase("", dbDriverNoPrompt, False, "ODBC;UID=sa;PWD=;DSN=HOSSDATA")
frmMain.prgBar1.Value = 2
Set rstFeriado = DB.OpenRecordset("FERIADOS", dbOpenDynaset)
If rstFeriado.RecordCount <> 0 Then
rstFeriado.MoveFirst
VACIA
ApagaBoton
Else
ApagaBoton
End If
frmMain.prgBar1.Value = 0
frmMain.prgBar1.Visible = False
Me.MousePointer = 0
frmMain.sbStatusBar.Panels(1) = "Preparado"
End Sub