マルチページコントロールでページを動的に追加する

Question

フォームを初期化するときに複数ページにいくつかのページを追加したいと思います。私はこのコードでそれをやった：pagini範囲で

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 

は、ページのキャプションの名前です。それは正常に動作します...それはそれらの名前を持つページを生成するが、私は動的にeverypageのいくつかの他のコントロールを追加したいと私は問題が...私はページの名前を知らない。 私は上記のコードで名前を追加しようとしましたが、私は

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

をコンパイルしようとしたとき、私はエラーを取得するだから私は、そのコードに追加されるすべてのページの名前を追加したいが、私は方法がわかりません。 ...私は名前を追加した後、私は各ページに他のコントロールをいくつか追加したいと思いますが、これは別の話です。 ありがとう！

Answer 1

Me.Controls("main").Pages.Countによって、paginiを追加した後の現在のページ数情報にアクセスできます。

したがって、Me.Controls("main").Pages(Me.Controls("main").Pages.Count)にアクセスして、いずれかのプロパティを変更してください。