Tryk på item i listbox og få det vist i textbox

Hej. Jeg har lavet et lilleprogram i VB som skal læse/skrive til en database. Det virker fint så man kan liste hele databasens indhold i en listbox og bladre i indholdet som vises i nogle textboxes. Dvs. listboxen og textboxerne har ikke noget med hinanden at gøre, ud over de henter fra samme database.
Nu vil jeg enormt gerne have det sådan at når jeg klikker på et item i listboxen, skal den automatisk "vise det item"/"bladre hen til det sted i databasen" i textboxerne (textbox i flertal!? nevermind i fatter godt hvad jeg skriver)
Hvordan kan det gøres?


listboxens indhold hentes med denne kode:
Data1.Recordset.MoveLast
Data1.Recordset.MoveFirst
For i = 0 To Data1.Recordset.RecordCount
Do While Data1.Recordset.EOF = False
List1.AddItem Data1.Recordset("id") & " - " & Data1.Recordset("navn")
Data1.Recordset.MoveNext
Loop
Next
Data1.Recordset.MoveFirst

-Og textboxerne (haha der var den igen) henter fra databasen med DataSource Data1 og de forskellige DataFields.

//simonhb