Premetto che sono alle prime armi con Vb6.
allora io ho una listbox da cui prendo l'indice selezionato.
ora io voglio fare che ad ogni indice selezionato
mi scriva in un'altra listbox dei valori presi da file di testo
ho provato cosi' ma ad ogni click mi aggiunge del testo nella listbox2
invece mi deve mettere solo quello relativo al file selezionato.
mi ci date un occhiata x favore .
so che e' semplice ma non ci riesco.
Grazie anticipate
====================================

Private Sub List1_Click()
Dim indice As Integer
Dim nomefile As String
indice = List1.ListIndex
Label1.Caption = indice
Select Case indice
Case 0
nomefile = "c:\1.txt"
Open nomefile For Input As #1
While Not EOF(1)
Input #1, nomefile
List2.AddItem (nomefile)
Close #2
Wend
Case 1
nomefile = "c:\2.txt"
Open nomefile For Input As #2
While Not EOF(2)
Input #2, nomefile
List2.AddItem (nomefile)
Close #1
Wend

End Select
End Sub