Ricercare un record tramite una TextBox

[Robyn69]

salve volevo sapere se era possibile ricercare un record da una textbox:

Dim NomeDaCercare As String
    NomeDaCercare = InputBox$("Immettere il nome da ricercare:", "Ricerca nell'Elenco")
    If NomeDaCercare <> "" Then
        'Esegue la ricerca solo se è stato immesso un nome.
        Data1.Recordset.Index = "id"
        Data1.Recordset.Seek "=", NomeDaCercare
        If Data1.Recordset.NoMatch Then
        Data1.Recordset.MoveFirst
        Data1.Refresh
            'Il nome cercato non è stato trovato.
            MsgBox "Nome non trovato.", vbInformation, Me.Caption
            End If
        End If
    End If

questo e il codice che mi permette la ricerca per mezzo di una msgbox
vorrei se fosse possibile ricercarlo per mezzo di una text.box
ossia quando nella textbox e visualizzato un nome mi scatta la ricerca nel data base
e mi visualizza il risultato della ricerca in un'altra textbox
es
file1.filename= al contenuto del campo (nomefile)
text3.text = file1.filename ( quindi quando questa visualizza un file la ricerca parte)
se la ricerca ha buon fine mi rimanda il contenuto del risultato nella text4.text
altrimenti, un mesg."Riferimento non trovato"
solo un ultima cosa
la ricerca deve fare riferimento al campo "descrizione" il quale fa riferimento al campo "nomefile", in realtà dovrei fare la ricerca su nomefile che sarebbe uguale al file1.filename, ma visualizzare nella text4.text la descrizione.
NON SO SE SONO STATO CHIARO spero di si ..

[LMondi]

Per fare l'operazione che desideri potresti usare l'evento Change():
Private Sub text3_Change()

L'evento viene generato quando viene eseguito un aggiornamento mediante un collegamento DDE, quando l'utente modifica il testo o quando si modifica l'impostazione della proprietà Text nel codice.

[Robyn69]

ma non riesco a farlo funzionare

sto provando ad incollare quel codice di prima nella text3_
vorrei dargli l'input direttamente dal contenuto della text3 ma non ci sono riuscito.

infatti provando dei codici quando avvio il programma e dalla lista seleziono un file,questo mi va nella text3.text, (come volevo io) ma si apre la finestra di mess. per inserire il nome da ricercare, mentre il nome e già nella text3.text e quindi vorrei farlo partire in automatico,
input non puo prenderlo dal contenuto della text3.text? anzichè aprirmi la finestra di mess.

dovrei sostituire la riga?
o spostarmi su altri riferimenti?

NomeDaCercare = InputBox$("Immettere il nome da ricercare:", "Ricerca nell'Elenco")