andresmaga respondió:
Para hacer esto probá haciendo un nuevo proyecto, y agregando un textbox que se llame text1 Después agregá este código: Private Sub Text1_Change() Text1.Text = UCase(Text1.Text) End Sub Esto te lo convertirá a mayúsculas siempre