如何将控件动态添加到winform

Question

我试图在一个winform上添加多个GroupBox。这是我的密码：

Dim newGroupBox As New System.Windows.Forms.GroupBox
Do
    newGroupBox = New System.Windows.Forms.GroupBox
    newGroupBox.Text = Colonnes(indexColonne, 0)
    newGroupBox.Name = "groupBox" & indexColonne
    Nomenclature_Regroupe.Controls.Add(newGroupBox)

    indexColonne = indexColonne + 1
Loop While Colonnes(indexColonne, 0) <> ""

它只添加了一个控件。我知道我的数组Colonnes有两个条目，但是它只在我的winform上显示一个条目。

我尝试手动添加它们，这是可行的：

Dim indexColonne = 0
Do
    Dim newGroupBox As New System.Windows.Forms.GroupBox
    newGroupBox.Text = Colonnes(0, 0)
    newGroupBox.Name = "groupBox" & indexColonne
    Nomenclature_Regroupe.Controls.Add(newGroupBox)

    Dim newGroupBox2 As New System.Windows.Forms.GroupBox
    newGroupBox.Text = Colonnes(1, 0)
    newGroupBox.Name = "groupBox" & indexColonne
    Nomenclature_Regroupe.Controls.Add(newGroupBox)

    indexColonne = indexColonne + 1
Loop While Colonnes(indexColonne, 0) <> ""

如何使用第一个循环动态添加它们？

Answer 1

所以，我要做的就是增加一个大小和一个位置，就像这样：

Dim indexColonne = 0
Do
    Dim newGroupBox As New System.Windows.Forms.GroupBox
    newGroupBox.Text = Colonnes(0, 0)
    newGroupBox.Name = "groupBox" & indexColonne
    newGroupBox.AutoSize = True
    newGroupBox.Left = 100 * indexColonne
    Nomenclature_Regroupe.Controls.Add(newGroupBox)

    indexColonne = indexColonne + 1
Loop While Colonnes(indexColonne, 0) <> ""