...
Te dejo un ejemplo, para listbox y textbox:
Private Sub btnCargarArchivo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCargarArchivo.Click
'EN UN LISTBOX
Dim objLectorList As StreamReader = File.OpenText("C: exto.txt")
Do While Not objLectorList.EndOfStream
Me.ListBox1.Items.Add(objLectorList.ReadLine)
Loop
FileClose()
objLectorList.Close()
'EN UN TEXTBOX, CON PROPIEDAD MULTILINE = TRUE
Dim objLectorText As StreamReader = File.OpenText("C: exto.txt")
Me.TextBox2.Text = objLectorText.ReadToEnd
FileClose()
objLectorText.Close()
End Sub
Salu2.