'添加控件
Dim pc1 As New CheckBox
pc1.Text = "FX-A01"
pc1.Checked = True
pc1.Location = New System.Drawing.Point(10, 0)
pc1.Width = 80
Me.Controls.Add(pc1)
Dim pc1 As New CheckBox
pc1.Text = "FX-A01"
pc1.Checked = True
pc1.Location = New System.Drawing.Point(10, 0)
pc1.Width = 80
Me.Controls.Add(pc1)