Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Im folgenden Beispiel wird die Style-Eigenschaft verwendet, um die Darstellung der Registerkarten in MultiPage und TabStrip anzugeben. This example also demonstrates using a Label. Der Benutzer wählt eine Formatvorlage aus, indem er ein OptionButton-Element auswählt.
Kopieren Sie diesen Beispielcode in den Deklarationsbereich eines Formulars. Stellen Sie sicher, dass das Formular folgende Komponenten enthält:
- Ein Bezeichnungsfeld-Steuerelement ( Label ) mit der Bezeichnung "Label1".
- Drei Optionsfeld-Steuerelemente ( OptionButton ) mit der Bezeichnung "OptionButton1" bis "OptionButton3".
- Ein MultiPage -Objekt mit der Bezeichnung "MultiPage1".
- Ein TabStrip -Objekt mit der Bezeichnung "TabStrip1".
- Ein beliebiges Steuerelement im Register-Steuerelement ( TabStrip ).
- Ein beliebiges Steuerelement auf jeder Seite des Multiseiten-Steuerelements ( MultiPage ).
Private Sub OptionButton1_Click()
MultiPage1.Style = fmTabStyleTabs
TabStrip1.Style = fmTabStyleTabs
End Sub
Private Sub OptionButton2_Click()
'Note that the page borders are invisible
MultiPage1.Style = fmTabStyleButtons
TabStrip1.Style = fmTabStyleButtons
End Sub
Private Sub OptionButton3_Click()
'Note that the page borders are invisible and
'the page body begins where the tabs normally
'appear.
MultiPage1.Style = fmTabStyleNone
TabStrip1.Style = fmTabStyleNone
End Sub
Private Sub UserForm_Initialize()
Label1.Caption = "Page/Tab Style"
OptionButton1.Caption = "Tabs"
OptionButton1.Value = True
MultiPage1.Style = fmTabStyleTabs
TabStrip1.Style = fmTabStyleTabs
OptionButton2.Caption = "Buttons"
OptionButton3.Caption = "No Tabs or Buttons"
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.