Ciao a tutti,
avrei bisogno di leggere un file di testo linea x linea in modo da popolare una listbox, ho provato in questo modo:

codice:
Dim read As StreamReader
        Dim a As String
        read = File.OpenText("prova.txt")
        a = read.ReadLine()
        Do While Not a Is Nothing
            ListBox1.Items.Add(a)
        Loop

Ma non funziona qualcuno può spiegarmi dove sbaglio per favore?


Grazie