这一段程序为什么不能运行？

关于Private Sub Text1_Change()
If Test1.lostfocue Then
Text1.setFocue
End If
End Sub

Private Sub Text2_Change()
If test2.lostfocue Then test2.setfouse
End Sub

我希望达到的结果是：
当我打开文件时，光标在文本框1
当我点击2时就死机了的问题

Private Sub Text1_lostfocus()
Text1.setFocus
End Sub
Private Sub Text2_lostfocus()
test2.setfocus
End Sub