Cómo: Leer texto de un archivo

Actualización: noviembre 2007

Los ejemplos de código siguientes muestran cómo leer texto desde un archivo de texto. El segundo ejemplo ofrece una notificación cuando se detecta el fin del archivo. Esta funcionalidad también se puede conseguir utilizando los métodos ReadAllLines o ReadAllText.

Ejemplo

Imports System
Imports System.IO

Class Test
    Public Shared Sub Main()
        Try
            ' Create an instance of StreamReader to read from a file.
            Using sr As StreamReader = New StreamReader("TestFile.txt")
                Dim line As String
                ' Read and display the lines from the file until the end 
                ' of the file is reached.
                Do
                    line = sr.ReadLine()
                    Console.WriteLine(Line)
                Loop Until line Is Nothing
                sr.Close()
            End Using
        Catch E As Exception
            ' Let the user know what went wrong.
            Console.WriteLine("The file could not be read:")
            Console.WriteLine(E.Message)
        End Try
    End Sub
End Class

using System;
using System.IO;

class Test 
{
    public static void Main() 
    {
        try 
        {
            // Create an instance of StreamReader to read from a file.
            // The using statement also closes the StreamReader.
            using (StreamReader sr = new StreamReader("TestFile.txt")) 
            {
                String line;
                // Read and display lines from the file until the end of 
                // the file is reached.
                while ((line = sr.ReadLine()) != null) 
                {
                    Console.WriteLine(line);
                }
            }
        }
        catch (Exception e) 
        {
            // Let the user know what went wrong.
            Console.WriteLine("The file could not be read:");
            Console.WriteLine(e.Message);
        }
    }
}

Option Explicit On 
Option Strict On
Imports System
Imports System.IO
Public Class TextFromFile
    Private Const FILE_NAME As String = "MyFile.txt"
    Public Shared Sub Main()
        If Not File.Exists(FILE_NAME) Then
            Console.WriteLine("{0} does not exist.", FILE_NAME)
            Return
        End If
        Using sr As StreamReader = File.OpenText(FILE_NAME)
            Dim input As String
            input = sr.ReadLine()
            While Not input Is Nothing
                Console.WriteLine(input)
                input = sr.ReadLine()
            End While
            Console.WriteLine("The end of the stream has been reached.")
            sr.Close()
        End Using
    End Sub
End Class

using System;
using System.IO;
public class TextFromFile 
{
    private const string FILE_NAME = "MyFile.txt";
    public static void Main(String[] args) 
    {
        if (!File.Exists(FILE_NAME)) 
        {
            Console.WriteLine("{0} does not exist.", FILE_NAME);
            return;
        }
        using (StreamReader sr = File.OpenText(FILE_NAME))
        {
            String input;
            while ((input=sr.ReadLine())!=null) 
            {
                Console.WriteLine(input);
            }
            Console.WriteLine ("The end of the stream has been reached.");
            sr.Close();
        }
    }

Programación eficaz

Este código crea un StreamReader que selecciona MyFile.txt mediante una llamada a File.OpenText. StreamReader.ReadLine devuelve cada línea como una cadena. Cuando ya no hay más caracteres que leer, se muestra un mensaje que lo notifica y se cierra la secuencia.

Nota:
Los usuarios de Visual Basic pueden utilizar las propiedades y métodos proporcionados por el objeto My.Computer.FileSystem para la entrada y salida de archivos. Para obtener más información al respecto, vea My.Computer.FileSystem (Objeto).

Vea también

Tareas

Cómo: Crear una lista de directorios

Cómo: Leer y escribir en un archivo de datos recién creado

Cómo: Abrir y anexar a un archivo de registro

Cómo: Escribir texto en un archivo

Cómo: Leer caracteres de una cadena

Cómo: Escribir caracteres en una cadena

Conceptos

E/S de archivos básica

Referencia

StreamReader

File.OpenText

StreamReader.ReadLine