Como ler e gravar em um arquivo de texto usando 2005 Visual Basic ou Visual Basic.NET

Traduções de Artigos Traduções de Artigos
Artigo: 315828 - Ver produtos para os quais este artigo se aplica.
Para uma versão deste artigo do Microsoft Visual Basic 6.0, consulte 183638.
Expandir tudo | Reduzir tudo

Nesta página

Sumário

Este artigo demonstra como ler e gravar em um arquivo de texto usando o Microsoft Visual Basic 2005 ou Microsoft Visual Basic.NET.

Requisitos

A lista seguinte descreve o hardware recomendado, software, infra-estrutura de rede e service packs que você precisa:
  • 2005 Visual Basic ou Visual Basic.NET
Este artigo pressupõe que você esteja familiarizado com os seguintes tópicos:
  • 2005 Visual Basic ou Visual Basic.NET

Ler e gravar arquivos de texto

O"Ler um arquivo de texto" seção demonstra como usar o objeto StreamReader para ler um arquivo de texto. O"Gravar um arquivo de texto (exemplo 1)"seção e o "Gravar um arquivo de texto (exemplo 2)" seção demonstram como usar a classe StreamWriter para gravar texto em um arquivo.

Ler um arquivo de texto

O código a seguir usa a classe StreamReader abrir, ler e feche o arquivo de texto. Você pode passar o nome do caminho de um arquivo de texto para o construtor StreamReader para abrir o arquivo automaticamente. O método ReadLine lê cada linha de texto e incrementa o ponteiro de arquivo para a próxima linha como ela lê. Quando o método ReadLine atinge o final do arquivo, ele retorna Nothing.
  1. Inicie o Microsoft Visual Studio 2005 ou Microsoft Visual Studio.NET.
  2. Criar um novo aplicativo de Console em 2005 Visual Basic ou Visual Basic .NET.
  3. Adicione o seguinte código na parte superior do arquivo Module1. vb:
    Imports System.IO
    					
  4. Adicione o seguinte código ao procedimento Sub Main .
    Dim objStreamReader As StreamReader
        Dim strLine As String
    
        'Pass the file path and the file name to the StreamReader constructor.
        objStreamReader = New StreamReader("C:\Boot.ini")
    
        'Read the first line of text.
        strLine = objStreamReader.ReadLine
    
        'Continue to read until you reach the end of the file.
        Do While Not strLine Is Nothing
    
          'Write the line to the Console window.
          Console.WriteLine(strLine)
    
          'Read the next line.
          strLine = objStreamReader.ReadLine
        Loop
    
        'Close the file.
        objStreamReader.Close()
    
        Console.ReadLine()
    					
  5. No menu Debug , clique em Iniciar para compilar e executar o aplicativo. Pressione ENTER para fechar o Janela de console.

    A janela Console exibe o arquivo Boot. ini. Observação o conteúdo do arquivo Boot. ini pode variar de configuração para configuração. A saída a seguir é um exemplo de arquivo Boot. ini:
    [boot loader]
    timeout=5
    default=multi(0)disk(0)rdisk(0)partition(1)\WINNT
    
    [operating systems]
    multi(0)disk(0)rdisk(0)partition(1)\WINNT="Windows 2000 Professional" /fastdetect
    C:\ = "Windows 98"
    						

Gravar um arquivo de texto (exemplo 1)

O código a seguir usa a classe StreamWriter para abrir, gravar e fechar o arquivo de texto. Semelhantes para StreamReader, você pode passar o nome do caminho de um arquivo de texto para o construtor StreamWriter para abrir o arquivo automaticamente. O método WriteLine grava uma linha completa de texto para o arquivo de texto.
  1. Inicie Visual Studio 2005 ou Visual Studio.NET.
  2. Criar um novo aplicativo de Console em 2005 Visual Basic ou Visual Basic .NET.
  3. Adicione o seguinte código na parte superior de Module1. vb:
    Imports System.IO
    					
  4. Adicione o seguinte código ao procedimento Sub Main :
    Dim objStreamWriter As StreamWriter
        
       'Pass the file path and the file name to the StreamWriter constructor.
       objStreamWriter = New StreamWriter("C:\Testfile.txt")
    
       'Write a line of text.
       objStreamWriter.WriteLine("Hello World")
    
       'Write a second line of text.
       objStreamWriter.WriteLine("From the StreamWriter class")
    
       'Close the file.
       objStreamWriter.Close()
    					
  5. No menu Debug , clique em Iniciar para compilar e executar o aplicativo.

    Este código cria um arquivo chamado Test. txt na unidade c. abrir Test. txt em um editor de texto como como o bloco de notas. Test. txt contém duas linhas de texto:
    Hello World
    From the StreamWriter class
    						

Gravar um arquivo de texto (exemplo 2)

O código a seguir usa a classe StreamWriter para abrir, gravar e fechar o arquivo de texto. Ao contrário o exemplo anterior, esse código passa dois parâmetros adicionais para o construtor.

O primeiro parâmetro é o caminho do arquivo e o nome do arquivo de o arquivo. O segundo parâmetro, True, especifica que o arquivo seja aberto no modo de acréscimo. Se você especificar False para o segundo parâmetro, o conteúdo do arquivo é substituído sempre que executar o código. O terceiro parâmetro especifica o Unicode para que StreamWriter codifica o arquivo em Unicode. Você também pode especificar o seguinte métodos de codificação para o terceiro parâmetro:
  • ASCII
  • BigEndianUnicode
  • UTF7
  • UTF8
O método Write é semelhante ao método WriteLine , exceto que gravação não automaticamente incorporar um retorno de carro/linha (CR/LF) de alimentação combinação de caracteres. Isso é útil quando você deseja escrever um caractere de cada um tempo.
  1. Inicie Visual Studio 2005 ou Visual Studio.NET.
  2. Criar um novo aplicativo de Console em 2005 Visual Basic ou Visual Basic .NET.
  3. Adicione o seguinte código na parte superior de Module1. vb:
    Imports System.IO
    Imports System.Text
    					
  4. Adicione o seguinte código ao procedimento Sub Main em seu código existente:
    Dim objStreamWriter As StreamWriter
       Dim x As Long
        
       'Open the file.
       objStreamWriter = New StreamWriter("C:\Test2.txt", True, _
          Encoding.Unicode)
    
       'Write out the numbers 1 through 10 on the same line.
       For x = 1 To 10
         objStreamWriter.Write(x)
       Next x
        
       'Close the file.
       objStreamWriter.Close()
    					
  5. No menu Debug , clique em Iniciar para compilar e executar o aplicativo.

    Este código cria um arquivo chamado test2. txt na unidade c. abrir test2. txt em um editor de texto como como o bloco de notas. Test2. txt contém uma única linha de texto:
    12345678910
    							
    Observação Se você executar o código várias vezes, o texto "123456789" é repetido na mesma linha.

Listagem de código completo

'Read a Text File
Imports System.IO
Module Module1

    Sub Main()
        Dim objStreamReader As StreamReader
        Dim strLine As String

        'Pass the file path and the file name to the StreamReader constructor.
        objStreamReader = New StreamReader("C:\Boot.ini")

        'Read the first line of text.
        strLine = objStreamReader.ReadLine

        'Continue to read until you reach the end of the file.
        Do While Not strLine Is Nothing

            'Write the line to the Console window.
            Console.WriteLine(strLine)

            'Read the next line.
            strLine = objStreamReader.ReadLine
        Loop

        'Close the file.
        objStreamReader.Close()

        Console.ReadLine()
    End Sub
End Module

'Write a Text File: Version 1
Imports System.IO
Module Module1

    Sub Main()
        Dim objStreamWriter As StreamWriter

        'Pass the file path and the file name to the StreamWriter constructor.
        objStreamWriter = New StreamWriter("C:\Text.txt")

        'Write a line of text.
        objStreamWriter.WriteLine("Hello World")

        'Write a second line of text.
        objStreamWriter.WriteLine("From the StreamWriter class")

        'Close the file.
        objStreamWriter.Close()

    End Sub
End Module

'Write a Text File: Version 2
Imports System.IO
Imports System.Text
Module Module1

    Sub Main()
        Dim objStreamWriter As StreamWriter
        Dim x As Long

        'Open the file.
        objStreamWriter = New StreamWriter("C:\Test2.txt", True, _
           Encoding.Unicode)

        'Write out the numbers 1 through 10 on the same line.
        For x = 1 To 10
            objStreamWriter.Write(x)
        Next x

        'Close the file.
        objStreamWriter.Close()
    End Sub

End Module
				

Solução de problemas

Sempre que a entrada ou saída de um arquivo, é uma boa programação prática para encapsular o código dentro de um bloco Try-final de Try caso ocorra um erro. Alguns possíveis erros incluem um arquivo não existe ou um arquivo que já está em uso.

Referências

Para obter mais informações, visite o seguinte da Microsoft sites:
Como fazer...Ler um arquivo de texto?
http://msdn.microsoft.com/en-us/library/db5x7c0d.aspx


Como fazer...Ler e gravar arquivos grandes?
. aspx http://msdn.microsoft.com/en-us/library/6ka1wd3w (v=vs.80)

Classe StreamReader
. aspx http://msdn.microsoft.com/en-us/library/System.IO.StreamReader (v=vs.71)

Classe StreamWriter
. aspx http://msdn.microsoft.com/en-us/library/System.IO.StreamWriter (v=vs.71)

Propriedades

Artigo: 315828 - Última revisão: 7 de junho de 2012 - Revisão: 2.0
A informação contida neste artigo aplica-se a:
  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
Palavras-chave: 
kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 315828

Submeter comentários

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com