Mostrar el contenido del archivo Aprende programación con ejercicios Visual Basic (VB.net)

Lección:

Administración de Archivos

Ejercicio:

Mostrar el contenido del archivo 56

Objetivo:

Cree un programa para mostrar todo el contenido de un archivo de texto en pantalla (nota: debe usar un StreamReader). El nombre del archivo se ingresará en la línea de comandos o (si no hay una línea de comandos presente) será solicitado al usuario por el programa.

Código:

Imports System
Imports System.IO
Namespace Reader
    Class Program
        Private Shared Sub Main()
            Console.Write("Enter name of file: ")
            Dim nameFile As String = Console.ReadLine()
            Dim myfile As StreamReader

            Try
                myfile = File.OpenText(nameFile)
                Dim line As String = " "

                Do
                    line = myfile.ReadLine()

                    If line IsNot Nothing Then
                        Console.WriteLine(line)
                    End If
                Loop While line IsNot Nothing

            Catch e As Exception
                Console.WriteLine("Error al intentar abir el fichero.")
            End Try

            Console.ReadLine()
        End Sub
    End Class
End Namespace