Visual Basic - Listbox y Datos

Me gustaria saber como puedo agregar datos a un listbox por medio de un boton que diga Abrir...
y luego me aparesca un browser para buscar algun archivo .txt y lo que aparesca dentro del archivo .txt aparesca adentro del listbox.

De antemano muchas gracias.

Bueno viejito, te cuento que para que esto te funcione debes agregar un Formulario y componente llamado Microsoft Common Dialog

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Private Sub Form_Load()
With CommonDialog1
.Filter = "Archivos de texto (*.txt)|*.txt"
.Action = 1
If .FileName <> "" Then
Dim Arch, Contenido
Set Arch = CreateObject("Scripting.FileSystemObject")
Set linea = Arch.OpenTextFile(.FileName, 1)
Do While linea.AtEndOfStream = False
Contenido = linea.ReadLine
List1.AddItem Contenido
Loop
End If
End With
End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Espero y te sirva, suerte