Você está offline; aguardando reconexão

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

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 traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 315828
Para uma versão deste artigo do Microsoft Visual Basic 6.0, consulte 183638.
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=5default=multi(0)disk(0)rdisk(0)partition(1)\WINNT[operating systems]multi(0)disk(0)rdisk(0)partition(1)\WINNT="Windows 2000 Professional" /fastdetectC:\ = "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 WorldFrom 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.IOImports 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 FileImports System.IOModule 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 SubEnd Module'Write a Text File: Version 1Imports System.IOModule 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 SubEnd Module'Write a Text File: Version 2Imports System.IOImports System.TextModule 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 SubEnd 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:
Try...... end try

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 315828 - Última Revisão: 06/07/2012 07:29:00 - Revisão: 2.0

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMtpt
Comentários