Pages.Add 方法 (Access)

Add方法會將新的Page物件新增至索引標籤控制項的Pages集合。

語法

運算式。新增 (Before)

表達 代表 Pages 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Before	選用	Variant	為 Integer，在新增 Page 物件之前指定 Page 物件的索引。 Page 物件的索引會對應至該 Page 物件的 PageIndex 屬性的值。 如果您省略此引數，則新的 Page 物件會新增到集合的最後。

傳回值

頁面

註解

Pages 集合中第一個 Page 物件會對應至索引標籤控制項的最左邊一頁，其索引為零。 緊接著最左邊頁右邊的頁為第二個 Page 物件，其索引為 1，依此類推索引標籤控制項的所有 Page 物件。

如果您為Before引數指定 0，則會在Pages集合中的第一個Page物件之前加入新的Page物件。 然後，新的 Page 物件會變成集合中索引為 0 的第一個 Page 物件。

只有當表單在 [設計檢視] 時，才可以將 Page 物件加入索引標籤控制項的 Pages 集合中。

範例

下列範例在設計檢視的表單中，新增一資料頁至索引標籤控制項。 若要嘗試此範例，請使用名為TabCtl0的 Tab 控制項，建立名為Form1的新表單。 將下列程式碼貼入標準模組並加以執行。

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 支援與意見反應。