Abrir arquivo TXT no VB

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

Visual Basic

abrir, Arquivo, Basic, input, open, Txt, Vb, Visual

2008-12-21

3 Comments