| Part | Description | |
| object | Required. A valid object. | |
| Boolean | Optional. Whether the object is a tab stop. | |
| Value | Description | |
| True | Designates the object as a tab stop (default). | |
| False | Bypasses the object when the user is tabbing, although the object still holds its place in the actual tab order, as determined by the TabIndex property. | |
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