La estructura Char - I

Mediante el uso de esta estructura podemos manejar tipos de datos simples de carácter. Los métodos compartidos de Char nos informarán del tipo de carácter que estamos manejando, además de poder realizar determinadas operaciones sobre dicho carácter. 

El Código fuente 322 muestra un ejemplo de uso de la estructura Char. Cada uno de los miembros de Char empleados se encuentra con un pequeño comentario aclaratorio de su funcionalidad.

Public Sub Main()

Dim lcCaracter As Char

Dim lsResultado As String

Dim lcConvertido As Char

Do

Console.WriteLine("Introducir un carácter o cero para salir")

lcCaracter = Convert.ToChar(Console.ReadLine())

lsResultado = ""

lcConvertido = Nothing

' IsDigit() indica si el carácter es un dígito decimal

If Char.IsDigit(lcCaracter) Then

lsResultado = "dígito"

End If

' IsLetter() indica si el carácter es una letra

If Char.IsLetter(lcCaracter) Then

lsResultado = "letra"

End If

' IsWhiteSpace() indica si el carácter es un espacio en blanco

If Char.IsWhiteSpace(lcCaracter) Then

lsResultado = "espacio"

End If

' IsPunctuation() indica si el carácter es un signo de puntuación

If Char.IsPunctuation(lcCaracter) Then

lsResultado &= "puntuación"

End If

' IsUpper() comprueba si el carácter está en mayúscula

If Char.IsUpper(lcCaracter) Then

lsResultado &= " mayúscula"

' ToLower() convierte el carácter a minúscula

lcConvertido = Char.ToLower(lcCaracter)

End If

' IsLower() comprueba si el carácter está en minúscula

If Char.IsLower(lcCaracter) Then

lsResultado &= " minúscula"

' ToUpper() convierte el carácter a mayúscula

lcConvertido = Char.ToUpper(lcCaracter)

End If

' mostramos una cadena con el tipo de carácter

Console.WriteLine("El carácter es: {0}", lsResultado)

' si hemos convertido el caracter a mayúscula/minúscula,

' lo mostramos

If Char.IsLetter(lcConvertido) Then

Console.WriteLine("El carácter se ha convertido: {0}", lcConvertido)

End If

Console.WriteLine()

' no salimos hasta que no se introduzca un 0

Loop Until lcCaracter = "0"c

End Sub

Código fuente 322