Abrir arquivo TXT no VB

21Dez08

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

Filed under: Visual Basic   |  3 Comments
Tags: abrir, Arquivo, Basic, input, open, Txt, Vb, Visual