小编nhe*_*ann的帖子

我有一个包含tabcontrol的表单,我想根据前一个表单上的用户输入修改它.我创建了一个名为"TabControl"的tabcontrol(我知道这是创意),并且我正在尝试为数组"tabNames()"的每个值添加一个选项卡.当我调试程序时,我在第一个窗体上的数组中输入值,当第二个窗体加载时,我的tabcontrol中什么都没有.有什么想法吗？

Public Sub frmContent_Load(ByVal sender As Object, ByVal e As EventArgs)
  lblTitle.Text = frmiFormCreator.txtTitle.Text
  For i As Integer = 0 To frmiFormCreator.numberOfTabs
    Dim tabPage(frmiFormCreator.numberOfTabs) As TabPage
    tabPage(i).Text = frmiFormCreator.tabNames(i)
    TabControl.TabPages.Add(tabPage(i))
  Next
End Sub