2011-07-24 50 views
2

我想在初始化表單時在多頁中添加一些頁面。我是用這個代碼做的:在多頁控件中動態添加頁面

Me.Controls("main").Pages.Remove (Page1) 
Me.Controls("main").Pages.Remove (Page1) 
For Each pagini In ws1.Range("pagini") 
    Me.Controls("main").Pages.Add (pagini) 
    i=i+1 
Next pagini 

在pagini範圍內是頁面的標題名稱。它工作正常......它生成這些名稱的網頁,但現在我想動態地添加一些其他控件在每個頁面上,我有一個問題......我不知道頁面的名稱。 我試着在上面的代碼中添加名字,但我得到一個錯誤,當我試圖編譯

Me.Controls("main").Pages.Add ("test" &i,pagini) 

所以我想在代碼中添加的每個頁面添加一個名字,但我不知道怎麼辦。 ...添加名稱後,我想在每個頁面上添加一些其他控件,但這是一個不同的故事,我希望我能設法做到這一點! 非常感謝!

回答

2

您可以通過Me.Controls("main").Pages.Count訪問頁數信息,該信息在添加pagini後即爲當前頁面。

因此,請轉到Me.Controls("main").Pages(Me.Controls("main").Pages.Count)並更改您想要的任何屬性。

+0

感謝您的回答。因此,在添加pagini之後,我應該添加一些類似於Me.Controls(「main」)。Pages(Me.Controls(「main」)。Pages.Count).Name =「test」&i? –

+0

@Andrei是的,應該工作。我沒有測試你的例子。 – jonsca