Visual Basic - textos con mayuscula

necesito que el contenido de los cuadros de texto donde voy a ingresar la informacion aparezcan en mayuscula sin que necesariamente active el "Bloq Mayús" del teclado
gracias

La instruccion es UCASE(Text1.text)

Ahora si queres que todo lo que se escribe en el text se convierta en mayuscula a medida que se escribe por mas que la persona insista en escribir en miniscula proba esto ......

en el evento Keypress del text

dim Char as string *1
char=chr(keyascii)
char=ucase(char)
keyascii=asc(char)

saludos .-

gracias... lo probe y resulto

hay una forma con menos codigo que es la siguiente.

Private Sub TEXTBOX_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub

espero que te sirva