Truco de Visual Basic.NET - Mayusculas y Minusculas
Me.TextBox1.CharacterCasing = CharacterCasing.Upper 'para MAYUSCULAS
Me.TextBox1.CharacterCasing = CharacterCasing.Lower 'para minúsculas
o
Me.TextBox1.CharacterCasing = CharacterCasing.Normal
Pon el truco en tus favoritos