Table of contents
TOC
Collapse the table of content
Expand the table of content

Style Property, Label Control Example

office 365 dev account|Last Updated: 6/12/2017
|
1 Contributor

The following example uses the Style property to specify the appearance of the tabs in MultiPage and TabStrip. This example also demonstrates using a Label. The user chooses a style by selecting an OptionButton.

To use this example, copy this sample code to the Declarations portion of a form. Make sure that the form contains:

  • A Label named Label1.

  • Three OptionButton controls named OptionButton1 through OptionButton3.

  • A MultiPage named MultiPage1.

  • A TabStrip named TabStrip1.

  • Any control inside the TabStrip.

  • Any control in each page of the 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
© 2018 Microsoft