在TEXTBOX中输入的要求全是大写字符如何解决

在TEXTBOX中输入的要求全是大写字符怎么解决
如题，只能用程序实现，也就是你输入任何一个小写字母，显示的却是大写的

------解决方案--------------------
Private Sub textbox_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles textbox.KeyPress

e.KeyChar = StrConv(e.KeyChar, VbStrConv.Uppercase)

End Sub