Bom, posso passar como se lê um arquivo txt... acho q já ajuda certo?
Dim i As Integer
Dim linha As String
Coloque, por exemplo, num commandButton este código:
i = 0
Arq = FreeFile
Open "caminho_e_nome_do_arquivo.txt" For Input As Arq ' determina o arquivo
Do While Not EOF(Arq)
Line Input #Arq, linha
If i = 0 Then 'este if serve apenas pra não deixar a primeira linha em branco
textbox.Text = linha
i = 1
Else
textbox.Text = textbox.Text & vbCrLf & linha
End If
Loop
Close Arq ' Fecha o arquivo
Espero q ajude
t+
