更改某些 ActiveX 和表单控件的选项卡顺序

Posted 2023-04-19

【中文标题】更改某些 ActiveX 和表单控件的选项卡顺序

【英文标题】：Change tab order of some ActiveX and Form Controls

【发布时间】：2016-11-23 13:53:22

【问题描述】：

我在工作表中创建了一些text-boxes (ActiveX Controls)、checkboxes (Form Controls) 和一个end-button (Form Controls)，并希望在它们之间创建tab。

我怎样才能做到这一点？

也许只有 VBA 才有可能。

非常感谢您的回答...

【参考方案1】：

没有办法通过属性（我知道）执行此操作，但您始终可以使用 KeyDown 事件，捕获 tab 键，然后使用 .Verb 设置焦点到你想要的地方。例如，如果您有一个 CheckBox、一个 ComboBox 和一个 TextBox：

Private Sub CheckBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 9 Then
        ComboBox1.Verb
    End If
End Sub

Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 9 Then
        TextBox1.Verb
    End If
End Sub

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 9 Then
        CheckBox1.Verb
    End If
End Sub