CrAzY hOuSe
Locos por la programación
Convierte una cadena de texto en Mayúsculas o Minúsculas.
.net

Syndication

Visual Basic dispone de dos funciones para convertir a mayúsculas o minúsculas una cadena de texto. Estas funciones son UCase (Upper Case) y LCase (Low Case), mayúsculas y minúsculas, respectivamente.

Crea un proyecto que contenga un TextBox (Text1) y dos CommandButton (Command1, Command2) con la propiedad Caption "Mayúsculas" y "Minúsculas", respectivamente, y añade el siguiente código:

Private Sub Command1_Click()
    ' Convierte todo el TextBox en Mayúsculas
    Text1.Text = UCase(Text1.Text)
End Sub
Private Sub Command2_Click()
    ' Convierte todo el TextBox en Minúsculas
    Text1.Text = LCase(Text1.Text)
End Sub

También puedes hacer una función para convertir el texto en letra capital, es decir la primera letra de la frase en mayúsculas y el resto en minúsculas.

Function ConvTextCapital(Texto As String) As String
    ' Convierte el texto enviado en letra capital, la primera en mayúscula y el resto en minúsculas
    ConvTextCapital = UCase(Left$(Texto, 1)) & LCase(Mid(Texto, 2))
End Function

Posted lun, feb 12 2001 22:29 by Maverick
Filed under: ,

Add a Comment

(optional)  
(optional)
(required)  
Remember Me?
MavericK
Powered by Community Server (Non-Commercial Edition), by Telligent Systems