73.858 lecturas

Convertir un texto a mayúsculas o minúsculas

Convertir un texto a mayúsculas o minúsculas
Publicado el jueves, 15 de julio de 2004
Enlaces patrocinados
Crear un formulario y situar un TextBox. Escribir:

Private Sub Text1_Change()
Dim I As Integer
Text1.Text = UCase(Text1.Text)
I = Len(Text1.Text)
Text1.SelStart = I
End Sub

Comparte el artículo en las redes sociales

15 comentarios del truco (página 1)
David dice
El comentario de Jorge en 2010, en el evento CHANGE del texto, solo debe ser completado con otra linea de codigo: SENDKEYS "{END}", lo cual ubica el cursor al final del texto cada vez que se cambia una letra
Publicado el martes, 28 de agosto de 2012
fs91 dice
disculpa a mi en unas maquinas con excel no me acepta el UCase dice que esa libreria no ha encontrado.
Publicado el viernes, 24 de febrero de 2012
paco dice
Muchas gracias Ariel, por del KeyPress
Publicado el domingo, 19 de febrero de 2012
Guillote dice
podria ser tambien asi.. Select Case KeyAscii Case 97 To 122 KeyAscii = KeyAscii - 32 End Select
Publicado el lunes, 13 de febrero de 2012
amd dice
si funciona :-)
Publicado el jueves, 15 de diciembre de 2011
Choli dice
Como podria ser para un combobox
Publicado el domingo, 04 de diciembre de 2011
Emmanuel dice
Solo tienen que poner txtnombre.text = txtnombre.tex.toupper
Publicado el lunes, 24 de octubre de 2011
faby dice
como hago para q m acept solo la primra letra en mayuscula y el resto no
Publicado el sábado, 01 de octubre de 2011
temoc dice
en el evento KeyPress del la caja de texto solo pongan e.KeyChar = e.KeyChar.ToString().ToUpper()[0]; y listo cuando pulces una tecla se cambiara a mayusculas
Publicado el miércoles, 04 de mayo de 2011
temoc dice
para que se complican la vida ejeje private void txtClave_KeyPress(object sender, KeyPressEventArgs e) { if (Char.IsLetter(e.KeyChar)) { e.Handled = false; e.KeyChar = e.KeyChar.ToString().ToUpper()[0]; } else if (Char.IsControl(e.KeyChar)) { e.Handled = false; } else if (Char.IsSeparator(e.KeyChar)) { e.Handled = false; } else { e.Handled = true; } //e.KeyChar = e.KeyChar.ToString().ToUpper()[0]; }
Publicado el miércoles, 04 de mayo de 2011
Comentar el artículo
Nombre:
Mail:
Comentario:
Código de seguridad:
Captcha
Repite el código de seguridad

Los trucos más leídos de Visual Basic 6.0