Private Sub Form_Load()
Command1.Caption = "确定"
Command2.Caption = "取消"
Command2.TabIndex = 0
End Sub
Private Sub Command1_Click()
Text1 = "确定"
End Sub
Private Sub Command2_Click()
Text1 = "取消"
End Sub
'请参考采纳!谢谢!
Private Sub Command1_Click()
Text1.Text = "确定"
End Sub
Private Sub Command2_Click()
Text1.Text = "取消"
End Sub
然后设置 Command2 的 tabindex 属性为 0 。Command1 的设置为 1.