Ejercicio
Mostrar el contenido del archivo
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