如何将输入小写字母自动转换成大写.txt

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· 文本 代码 · 共 6 行

可以使用SelStart属性来移动光标。如下面： 
    Private Sub Text1_Change() 
     Text1.Text = UCase(Text1.Text) 
     Text1.SelStart = Len(Text1.Text) 
    End Sub
<END>