vb.net - 面板控件卡在 visible=false

Question

我用的是vb2008 express版。我有一个面板控件设置为可见 = false 的表单（我添加它以复制它的属性）。我尝试动态添加面板，但是当我这样做时，我无法在表单上看到它。我什至为 panel.visble=true 设置了代码行，但是当我运行监视窗口时，它卡在了 visible =false

Sub addPlayer(ByVal p As Form2.player)
        '  Timer1.Enabled = False
        Dim gap As Integer = 20
        Dim pan123 As New Panel
        Dim nick As New Label, colorFrame As New Label

        pan123.Size = New Size(100, 100)
        pan123.BackColor = Color.AliceBlue
        pan123.ForeColor = Color.Aquamarine
        pan123.Location = New Point(200, 200)
        'pan.Size = Panel1.Size
        'pan.Location = Panel1.Location
        'pan.Top = Panel1.Top + Panel1.Height * playersNum + gap * playersNum


        nick.Text = p.nick
        nick.Size = Label2.Size
        nick.Location = Label2.Location
        nick.Font = Label2.Font
        nick.AutoSize = True


        colorFrame.AutoSize = False
        colorFrame.Size = Label3.Size
        colorFrame.Location = Label3.Location
        colorFrame.BackColor = p.colorP

        pan123.Visible = True
        'pan.Controls.Add(nick)
        'pan.Controls.Add(colorFrame)
        Me.Controls.Add(pan123)


        'nick.Visible = True

        playersNum = playersNum + 1
    End Sub

标签： vb.netpanel