共用方式為

Count 屬性範例

以下範例顯示表單控制集合的Count 屬性，以及 Count 屬性，用以識別每個 MultiPage 和 TabStrip 的頁面數與分頁數。

若要使用本範例，請將此範例程式碼複製到表單的宣告部分中。 該表單可包含符合下列限制條件之任意數目的控制項：

  • 多頁控制項的名稱必須以 MultiPage開頭。
  • TabStrip 控制項的名稱必須以 TabStrip開頭。

注意事項

你可以將頁面加入 多頁面 ，或在 TabStrip 中新增分頁。 在 Windows 中，雙擊控制鍵，然後在控制鍵的分頁區右鍵點擊，從捷徑選單選擇 新頁面 。

Private Sub UserForm_Initialize() 
 Dim MyControl As Control 
 
 MsgBox "UserForm1.Controls.Count = " _ 
 & Controls.Count 
 
 For Each MyControl In Controls 
 If (MyControl.Name Like "MultiPage*") Then 
 MsgBox MyControl.Name _ 
 & ".Pages.Count = " _ 
 & MyControl.Pages.Count 
 ElseIf (MyControl.Name Like "TabStrip*") Then 
 MsgBox MyControl.Name & ".Tabs.Count = " _ 
 & MyControl.Tabs.Count 
 End If 
 Next 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。

  • Last updated on