Convertir un archivo de texto en mayúsculas Curso de Programación Visual Basic

Lección:

Administración de Archivos


Ejercicio:

Convertir un archivo de texto en mayúsculas 8


Objetivo:

Escribe un programa para leer un archivo de texto y volcar su contenido a otro archivo, cambiando las letras minúsculas a mayúsculas.

Debe entregar solo el archivo ".cs", con su nombre en un comentario.


Código:

Imports System
Imports System.IO
Namespace FileLowerCaseToUpperCase
    Class Program
        Private Shared Sub Main()
            Console.Write("Enter name file: ")
            Dim fileName As String = Console.ReadLine()

            If File.Exists(fileName) Then
                Dim fileRw As StreamReader = File.OpenText(fileName)
                Dim fileWr As StreamWriter = File.CreateText(fileName & ".dat")
                Dim line As String

                Do
                    line = fileRw.ReadLine()
                    If line IsNot Nothing Then fileWr.WriteLine(line.ToUpper())
                Loop While line IsNot Nothing

                fileRw.Close()
                fileWr.Close()
            End If
        End Sub
    End Class
End Namespace