bueno, al menos para comenzar, te dejo esta rutina que es para traer el contenido del archivo txt en un textbox
Colocas en un formulario un CommonDialog, un textbox (Text1) y un boton (Command1)
' Esto va en el boton - evento Click
Private Sub Command1_Click()
Me.CommonDialog1.CancelError = True
On Error GoTo ErrHandler
Me.CommonDialog1.Filter = "Text File (*.txt)|*.txt|"
Me.CommonDialog1.ShowOpen
doc = Me.CommonDialog1.FileName
Open doc For Input As #1
Text1.Text = Input(LOF(1), 1)
Close #1
Exit Sub
ErrHandler:
End Sub
'Colocas la propiedad del textbox (Text1) Multiline = True
' Las primeras lineas controlan que en caso de no existir el archivo de texto no te genere error..
Cuando tengas lo demas, lo compartes
Salu2