formato mayusculas

[Judgement]

Iniciado por Avellaneda

Hola, aquí tienes otra forma:

Código:

Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(StrConv(Chr(KeyAscii), vbUpperCase))
End Sub

Esa esta mejor jajaja, no me la sabia gracias.