怎么判断鼠标指针不在文本框！

Question

Private Sub Form_KeyPress(KeyAscii As Integer)
On Error Resume Next
    If KeyAscii = vbKeyReturn Then
        SendKeys "{tab}"
        KeyAscii = 0
    End If
End Sub
我是这样用回车来控制的！
其中有一个text1.text如：
当text1.text=123  的时候
text1.text=姓名
text1.text=年龄
可是如何在输入123后
text1.text=姓名
text1.text=年龄
怎么判断鼠标指针！用什么方法来解决！

Answer 1

例如Private Sub Text4_GotFocus()
Text4.Text = "进入"
End SubPrivate Sub Text4_LostFocus()
Text4.Text = "离开"
End Sub

Answer 2

LostFocus事件只要焦点一一开就有事件！？？

Answer 3

用Validate事件解决问题！谢谢！ axiang80()