textbox con tendina (listbox)

[ghanje]

ho collegato dei textbox ad un database
come faccio a far si che all'evento _change dei textbox di un form appaia sotto di essi una tendina (una listbox) che mostri tutte le parole presenti nel recordset che iniziano con le lettere che sto digitando nel texbox...
In pratica popolo la listbox di tutti i dati presenti del recordset con questo codice, al form_load:

Data1.DatabaseName = App.Path & "\data\articoli.mdb"
Data1.Refresh
Do While Not Data1.Recordset.EOF
temp = Data1.Recordset![Codice Prodotto]
If IsNull(temp) Then temp = ""
List1.AddItem (temp)
Data1.Recordset.MoveNext
Loop

Dopodichè all'evento change dei textbox rendo visibile sotto di essi la listbox,con tutti i dati del recordset
Come faccio a collegare i textbox con la tendina (listbox)??qualcuno mi puo' aiutare con qualche esempio?Io uso visual basic 6
Grazie mille cmq.
ciao

[Mabi]

Prova così:

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA"
(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As _
Integer, ByVal lParam As Any) As Long

Private Sub Text1_Change()
Const LB_FINDSTRING = &H18F

List1.ListIndex = SendMessage(List1.hwnd, LB_FINDSTRING, -1, ByVal CStr(Text1.Text))
End Sub

[ghanje]

grazie mille

pero' mi da errore di sintassi

senti cmq ho risolto usando un combobox con style impostato a 1 (simple combo)
cmq..
sapresti per cortesia dirmi una cosa???
ti spiego
ho un data con 4 colonne...codice,descriz, importo1, importo2.
tutti i record della colonna "codice" sono visualizzati nel combobox...i record delle altre 3 colonne sono visualizzati in 3 textbox.
Come faccio a far si che quando scelgo un record dal combo, nei 3 textbox vengano visualizzati i rispettivi record delle altre 3 colonne che sono nella sua stessa riga???
grazie cmq, ciao stammi bene