27/09/2008, 06:24
|
 | | | Fecha de Ingreso: noviembre-2003
Mensajes: 959
Antigüedad: 21 años, 6 meses Puntos: 19 | |
| Respuesta: Mayusculas en VB 6.0
Cita:
Iniciado por Avellaneda 
Código:
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(StrConv(Chr(KeyAscii), vbUpperCase))
End Sub
 Procesamiento de mas...
Algo mas simple y facil
Código:
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub
|