Ciao a tutti.
Utilizzando access, vorrei creare una casella di testo di nome MyRicerca ed una ListBox (Casella di Riepilogo) chiamata Ricerca che punta ad una tabella FORNITORE.
Andando a riempire la casella di testo via via che digito le lettere dovrebbe comparire il nome del Fornitore.

Ho fatto il seguente ma non funge
codice:
Private Sub MyRicerca_Change()
Dim CaratteriDigitati As String
   CaratteriDigitati = Nz(Me!MyRicerca.Text, "")
   Me.Elenco.RowSource = "SELECT NomeFornitore FROM FORNITORE " & _
      "WHERE NomeFornitore LIKE '" & CaratteriDigitati & "*'"
Digitando le lettere scompaiono persino i valori nella ListBox.
Qualche aiuto?