ho un'altra domanda.. e questa volta non rubo spazio :
stò cercando di fare una selezione all'evento change di una txtbox mo vi faccio vedere il codice, quello in grassetto è quello che non riesco a fare, o forse sbaglio tutto :

codice:
Private Sub ricnome_Change()
Set DB = OpenDatabase(App.Path & "\dbad97.mdb")
  sSql = "Select * FROM tabprinc WHERE Nome= '" & Trim$(txtnome) & "'"
  Set Rs = DB.OpenRecordset(sSql)
  Do While Not Rs.EOF
  lstDb.Selected = txtnome
  
    Rs.MoveNext
  Loop
Rs.Close           
Set Rs = Nothing    
DB.Close            
Set DB = Nothing
End Sub
cioè praticamente quello che voglio fare è selezionare il campo presente nella listbox (lstdb) mentre scrivo nella txtbox (txtnome), cioè mettiamo ad esempio che io stia scrivendo il nome "raffaele", mentre scrivo raf.. mi deve selezionare i campi che iniziano con raf
Ho impostato bene il codice o ho sbagliato tutto?