Textbox Setfocus VBA

Question

我现在正在使用Powerpoint VBA，并尝试创建一个简单的登录系统 如果我专注于TextBox1，当我单击键盘上的TAB键时，我想将焦点设置为TextBox2。 这是我的代码。

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
If KeyCode = 9 Then
TextBox2.SetFocus
End If
End Sub

Private Sub TextBox2_Change()

End Sub

有什么问题？