Add 方法會將新的 Page 物件新增至索引標籤控制項的 Pages 集合。
語法
表達。在) 之前添加 (
詞 代表 Pages 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Before | 選用 | Variant | 為 Integer，在新增 Page 物件之前指定 Page 物件的索引。 Page 物件的索引會對應至該 Page 物件的 PageIndex 屬性的值。 如果您省略此引數，則新的 Page 物件會新增到集合的最後。 |
傳回值
頁面
註解
Pages 集合中第一個 Page 物件會對應至索引標籤控制項的最左邊一頁，其索引為零。 緊接著最左邊頁右邊的頁為第二個 Page 物件，其索引為 1，依此類推索引標籤控制項的所有 Page 物件。
如果您為 Before 引數指定 0，則會將新的 Page 物件新增至 Pages 集合中的第一個 Page 物件之前。 然後，新的 Page 物件會成為集合中索引為 0 的第一個 Page 物件。
只有當表單在 [設計檢視] 時，才可以將 Page 物件加入索引標籤控制項的 Pages 集合中。
範例
下列範例在設計檢視的表單中，新增一資料頁至索引標籤控制項。 若要嘗試此範例，請建立名為 Form1 的新表單，其中包含名為 TabCtl0 的索引標籤控制項。 將下列程式碼貼到標準模組中並執行它。
Function AddPage() As Boolean
Dim frm As Form
Dim tbc As TabControl, pge As Page
On Error GoTo Error_AddPage
Set frm = Forms!Form1
Set tbc = frm!TabCtl0
tbc.Pages.Add
AddPage = True
Exit_AddPage:
Exit Function
Error_AddPage:
MsgBox Err & ": " & Err.Description
AddPage = False
Resume Exit_AddPage
End Function
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。