Beispiel für TabStop-Eigenschaft

Im folgenden Beispiel wird die TabStop-Eigenschaft verwendet, um zu steuern, ob ein Benutzer die TAB-TASTE drücken kann, um den Fokus auf ein bestimmtes Steuerelement zu verschieben. Der Benutzer drückt die TAB-TASTE, um den Fokus zwischen den Steuerelementen im Formular zu verschieben, und klickt dann auf toggleButton , um TabStop für CommandButton1 zu ändern. Wenn TabStopauf False festgelegt ist, erhält CommandButton1 den Fokus nicht mithilfe von Tab.

Kopieren Sie diesen Beispielcode in den Deklarationsbereich eines Formulars. Stellen Sie sicher, dass das Formular folgende Komponenten enthält:

• Eine Befehlsschaltfläche ( CommandButton ) mit der Bezeichnung "CommandButton1".
• Ein ToggleButton -Objekt mit der Bezeichnung "ToggleButton1".
• Ein oder zwei andere Steuerelemente, wie zum Beispiel ein Optionsfeld- oder ein Listenfeld-Steuerelement ( OptionButton, ListBox ).

Private Sub CommandButton1_Click() 
 MsgBox "Clicked CommandButton1." 
End Sub 
 
Private Sub ToggleButton1_Click() 
 If ToggleButton1 = True Then 
 CommandButton1.TabStop = True 
 ToggleButton1.Caption = "TabStop On" 
 Else 
 CommandButton1.TabStop = False 
 ToggleButton1.Caption = "TabStop Off" 
 End If 
End Sub 
 
Private Sub UserForm_Initialize() 
 CommandButton1.Caption = "Show Message" 
 
 ToggleButton1.Caption = "TabStop On" 
 ToggleButton1.Value = True 
 ToggleButton1.Width = 90 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.