参考答案

Private Sub Command1_Click()
    Text1.SetFocus
End Sub
Private Sub Command2_Click()
    Text2.SetFocus
End Sub