ダイナミックラベルは指定されたグループボックスに表示されません

Question

基本的に私はグループボックス用のダイナミックラベルを作成していますが、作成する最初の10個だけを表示し、次の10個は表示されません。私はそれを理解するのに苦労している。

ここでは、グループボックスのラベルを追加するために私の方法です：

Private Sub Create_Numbered_Labels() 
    Dim x As Integer 

    ''10 First labels 

    For x = 0 To 9 
     ''Create labels (1 to 10) 
     Dim lbl As Label = Custom_Label((x + 1).ToString(), "lblNumber" & (x + 1).ToString(), New Point(6, 48 + (x * 38))) 
     ''Add in Groupbox 
     grpEssais.Controls.Add(lbl) 
    Next 

    ''10 next labels 

    For x = 10 To 19 
     ''Create Labels (11 to 20) 
     Dim lbl As Label = Custom_Label((x + 1).ToString(), "lblNumber" & (x + 1).ToString(), New Point(493, 48 + (x * 38))) 
     ''Add in GroupBox 
     grpEssais.Controls.Add(lbl) 
    Next 
End Sub 

ここに私の関数Custom_Label（）

Function Custom_Label(Sent_Text As String, Sent_Name As String, Sent_Location As Point) As Label 
    ''Instance 
    Dim lbl As New Label() 

    ''DO NOT MODIFY 
    lbl.AutoSize = False 
    lbl.Size = New Size(33, 29) 
    lbl.TextAlign = ContentAlignment.MiddleCenter 
    lbl.BackColor = Color.White 


    ''MODIFY WITH PARAMETERS 
    lbl.Text = Sent_Text 
    lbl.Name = Sent_Name ''LabelName (Sent_Name)-->String 
    lbl.Location = Sent_Location ''Location (Sent_Location)-->Point() type 

    ''Return the label 
    Return lbl 
End Function 

Answer 1

これであなたを悩ませて申し訳ありませんです。私が論理的なエラーであることがわかりました。 ラベルを作成していたときに、それらを正しい場所に置いていなかったため、グループボックスの外に出てしまいました。

Private Sub Create_Numbered_Labels() 
    Dim x As Integer 

    ''10 First labels 

    For x = 0 To 9 
     ''Create labels (1 to 10) 
     Dim lbl As Label = Custom_Label((x + 1).ToString(), "lblNumber" & (x + 1).ToString(), New Point(6, 48 + (x * 38))) 
     ''Add in Groupbox 
     grpEssais.Controls.Add(lbl) 
    Next 

    ''10 next labels 

    For x = 0 To 9 
     ''Create Labels (11 to 20) 
     Dim lbl As Label = Custom_Label(((x + 1) + 10).ToString(), "lblNumber" & ((x + 1) + 10).ToString(), New Point(493, 48 + (x * 38))) 
     ''Add in GroupBox 
     grpEssais.Controls.Add(lbl) 
    Next 
End Sub