在Multipage控件中dynamic添加页面

当初始化表单时,我想要在多页中添加一些页面。 我用这个代码做了:

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 

在页面范围内是页面的标题名称。 它工作正常…它生成这些名称的页面,但现在我想dynamic地添加一些其他控件在每个页面,我有一个问题…我不知道页面的名称。 我试图在上面的代码中添加名称,但是当我尝试编译时出现错误

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

所以我想为每个页面添加一个名字,但是我不知道如何……在添加名称之后,我想在每个页面上添加一些其他的控件,但是这是一个不同的故事,会设法做到这一点! 非常感谢!

您可以通过Me.Controls("main").Pages.Count访问页面计数信息,这是在添加paginipagini

因此,转到Me.Controls("main").Pages(Me.Controls("main").Pages.Count)并更改你想要的属性。