Para abrir e visualizar o conteudo de um arquivo TXT no Visual Basic eh bem simples, segue um exemplo:

Private Sub LerArquivo()

Dim s As String
Dim texto As String
Open “c:\teste.txt” For Input As #1
Do Until EOF(1)
Line Input #1, s
texto = texto + s
Loop
Close #1
MsgBox texto

End Sub

abs

About these ads