Da file di testo a ListBox

[Palpas]

Ho un file di testo contentente diverse righe: vorrei importare il contenuto di questo file in una ListBox per elencare le righe.
Uso Visual basic 6
grazie

[Palpas]

Trovato, posto il codice:

Codice: Seleziona tutto

Private Sub Form_Load()
On Error GoTo fine
Open "C:\aaa.txt" For Input As 1
Do
Input #1, linea
List1.AddItem linea
Loop Until EOF(1) = True
Close #1
Exit Sub
fine:
Close #1
MsgBox Err.Description
End Sub