Hente text fra linje

Hvordan kan man hente en linje text fra et text dokument og indsætte det i en textbox?

Mit program ser således ud at jeg har en listbox og en textbox. Mit ønske er at når man trykker på en ting i listbox skal den loade linje nr. 1 i textfil.txt og indsætte den i textboxen, og vis jeg vælger en anden ting fra listbox henter den linje nr. 2...etc


Jeg kender godt til denne metode:

Private Sub testliste_Click()
If Form1.testliste.Text = \"test\" Then
    Info.Text = \"Test\"
end if
end sub

Problemet er at der skal gerne kunne skrives meget og det tillader dette ikke!