Style 屬性、Label 控制項範例
下列範例會使用 Style 屬性來指定 MultiPage 和 TabStrip中索引標籤的外觀。 此範例也會示範如何使用 標籤。 使用者選取 OptionButton來選擇樣式。
若要使用本範例,請將此範例程式碼複製到表單的宣告部分中。 請確定表單包含:
- 一個名為 Label1 的 Label 。
- 三個分別名為 OptionButton1 到 OptionButton3 的 OptionButton 控制項。
- 一個名為 MultiPage1 的 MultiPage 。
- 一個名為 TabStrip1 的 TabStrip 。
- TabStrip 中的任意控制項。
- MutliPage 的每一頁中的任意控制項。
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
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。