. The Net dentro de Visual Basic inclui várias formas de abrir e ler um arquivo em disco. A maioria usa algum tipo de classe StreamReader para converter o arquivo em um fluxo seqüencial de caracteres ou linhas . Cada carácter ou linha é então lido para a memória eo programa processa os dados do início ao fim. Quando o último caractere é lido pelo programa , o indicador EndOfStream é definido como verdadeiro . Você pode construir um pequeno programa que copia o arquivo de origem para o console , enquanto observa para o indicador de fim de arquivo . Instruções
1

Criar um novo aplicativo de console do Visual Basic. Abra o Visual Basic Express ( ou estúdio Visual ) . Clique em " Arquivo", " New Project" . Do ponto de vista de árvore, clique em Windows Application em Visual Basic, escolha o ícone de aplicativo do console , em seguida, clique no botão "OK" . Após uma pequena espera , uma nova janela de código aparecerá
2

Adicione a seguinte linha ao início do arquivo antes da declaração do módulo: .

Imports System.IO

Module Module1

Isto diz Visual Basic que você planeja usar as classes no namespace System.IO .
3

Declare algumas variáveis ​​de memória no início do a sub-rotina principal da seguinte forma :

Sub Main ()

Dim fileName as String = " .. \\ .. \\ Module1.VB "

Dim rdr como StreamReader < br >

Dim txt as String

O nome variável contém o nome do arquivo a ser lido. Os dois períodos duplos ( .. \\ ) indica que o arquivo é duas pastas a partir do diretório atual. Uma vez que o programa é executado na pasta \\ release bin \\ debug ou bin , é preciso mover -se duas pastas para encontrar o arquivo de origem.

RDR variável irá realizar uma instância da classe StreamReader no System.IO pacote . O StreamReader contém todos os métodos usados ​​para ler o arquivo.

O txt variável será usada para manter cada linha do arquivo como ele é copiado .
4

Abra o texto arquivo usando o seguinte código:

Experimente em

rdr = File.OpenText ( fileName )

Pegar ex as Exception

Console.WriteLine (" não é possível abrir arquivo "& ex.Message )

Retornar

End Try

o método File.OpenText cria uma instância de StreamReader apontou para o arquivo . Se o arquivo não existir , será apresentada uma exceção e uma mensagem de erro é escrita
5

Leia o arquivo e copiá-lo para o console usando o seguinte código : .

Enquanto rdr . EndOfStream = False

txt = rdr.ReadLine

Console.WriteLine (txt)

End While

O circuito é bastante simples. Antes de o loop começa , o EndOfStream é falso (a menos que o arquivo está vazio ) . Em cada ocorrência do loop, uma linha de texto é lido no txt variável , em seguida, escrito para o console. Após a última linha é lido , o indicador EndOfStream fica definido como true eo loop termina.
6

Fechar o arquivo quando o laço termina .

Rdr.Close () < br >

End Sub End Module

método Close do StreamReader libera o arquivo, em seguida, o programa termina.