CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Mayúscula

(1/2) > >>

Jorge Israel López Ramíre:
Hola tengo un problemita que no puedo resolver, resulta que no me gusta ver que los usuarios escriban los nombres de las personas con la primer letra en minúscula, y como sé que hay muchos por ahí que tienen pereza de estar escribiendo en mayúscula cada vez que van a ingresar el primer nombre, segundo, apellidos, etc. Entonces quiero que la aplicación realice esto, yo sé como hacer que todo lo que escriba el usuario este en mayúscula, pero no sé como hacer para especificar que solo sea la primera letra.  :kicking:

 :kicking: Gracias por su ayuda. :whistling:

Mollense:

--- Cita de: "Jorge Israel López Ramírez" ---Hola tengo un problemita que no puedo resolver, resulta que no me gusta ver que los usuarios escriban los nombres de las personas con la primer letra en minúscula, y como sé que hay muchos por ahí que tienen pereza de estar escribiendo en mayúscula cada vez que van a ingresar el primer nombre, segundo, apellidos, etc. Entonces quiero que la aplicación realice esto, yo sé como hacer que todo lo que escriba el usuario este en mayúscula, pero no sé como hacer para especificar que solo sea la primera letra.  :kicking:
Jorge Israel López Ramírez
 :kicking: Gracias por su ayuda. :whistling:
--- Fin de la cita ---
¿Que tal Jorge Israel López Ramírez?  :ph34r:

Si la cadena tiene una sola palabra, es muy fácil:


--- Código: Text ---        Dim strPalabra As String = "pALaBra"        Dim strResultante As String = strPalabra.Substring(0, 1).ToUpper() & strPalabra.Substring(1, strPalabra.Length - 1).ToLower()        MsgBox(strResultante) 
Y si es una frase, también es muy facil:

--- Código: Text ---        Dim strTexto As String = "aqUí vA tu ORaCión"        Dim strResultante As String = ""        For Each strPalabra As String In strTexto.Split(" ")            strResultante = strResultante & strPalabra.Substring(0, 1).ToUpper() & strPalabra.Substring(1, strPalabra.Length - 1).ToLower() & " "        Next        'borramos el último espacio que está de mas        strResultante = strResultante.Remove(strResultante.Length - 1, 1)        MsgBox(strResultante) 
Tendrías que hacer algunas validaciones pero con esto ya podés darte una idea

Espero te sirva

Jorge Israel López Ramíre:
Muchas gracias por tu apoyo, voy a probarlo.

Mollense:

--- Cita de: "Jorge Israel López Ramírez" --- Muchas gracias por tu apoyo, voy a probarlo.
--- Fin de la cita ---
Por nada, espero noticias.

Jorge Israel López Ramíre:
Bien los probé, funciona escribiendo al palabra como lo enviaste, pero cuando la asignación del string al cuadro de texto que va contener el nombre, me genera una excepción debido a los argumentos de el length(). Dice que es una excepción de argumentos fuera de rango, que el index y el length debieron referirse a una localización dentro de el string.
Nombre de parametro: Length.

Estoy buscando como solucionar, pero si tienes la respuesta, te lo agradecería.
 :hola: SALUDOS

Navegación

[0] Índice de Mensajes

[#] Página Siguiente