Text File into Listbox

Hi,

This has done before (as usual) but I was just wondering if someone could suggest some code.

I want to read a text file line by line into a listbox, eg, every new line in the textfile is read into another line in the listbox.

The file is predetermined, so no editing is needed.

Please help, regards,

Phil

Use Line Input # statement.

Code:

---

Private Sub Command1_Click()

    Open "C:\MyTXT.txt" For Input As #1
    Do While Not EOF(1)
        Line Input #1, strLine$
        List1.AddItem strLine$
    Loop
    Close #1
   
End Sub

---