text文本的一个小问题？
text文本框控件
目的：当输入的是空格的时候，将现在的文本内容变为空，同时光标回到文本的起始位置。
问题:当空格键按后，内容被清空，但光标会停留在第二个字符的位置，看似是多了一个空格。
请教如何做才不会有这个空格，怎么才能让光标回到第一个字符的位置。

[解决办法]
注意使用的事件：
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 32 Then
Text1.Text = " "
KeyCode = 0
End If
End Sub