[紧急求助]关于光标焦点问题。
请问在文本框中,要将用户输入的每一个字符都转为大写,但同时光标焦点始终要保持在最右端,请问该如何写??
Private Sub Text1_Change()
Dim tempPos As Long
tempPos = Text1.SelStart
Text1.Text = UCase(Text1.Text)
Text1.SelStart = tempPos
End Sub