vb.net入门之分组控件：GroupBox控件

　　'RadioButton6

　　RadioButton6.BackColor = System.Drawing.SystemColors.Control

　　RadioButton6.Location = New System.Drawing.Point（8， 75）

　　RadioButton6.Name = "RadioButton6"

　　RadioButton6.Size = New System.Drawing.Size（80， 24）

　　RadioButton6.TabIndex = 3

　　RadioButton6.Text = "四单元"

　　'RadioButton7

　　RadioButton7.Location = New System.Drawing.Point（8， 32）

　　RadioButton7.Name = "RadioButton7"

　　RadioButton7.Size = New System.Drawing.Size（80， 24）

　　RadioButton7.TabIndex = 1

　　RadioButton7.Text = "二楼"

　　'RadioButton8

　　RadioButton8.Location = New System.Drawing.Point（8， 53）

　　RadioButton8.Name = "RadioButton8"

　　RadioButton8.Size = New System.Drawing.Size（80， 24）

　　RadioButton8.TabIndex = 2

　　RadioButton8.Text = "三楼"

　　'RadioButton9

　　RadioButton9.Location = New System.Drawing.Point（8， 13）

　　RadioButton9.Name = "RadioButton9"

　　RadioButton9.Size = New System.Drawing.Size（80， 24）

　　RadioButton9.TabIndex = 0

　　RadioButton9.Text = "一楼"

　　'RadioButton10

　　RadioButton10.BackColor = System.Drawing.SystemColors.Control

　　RadioButton10.Location = New System.Drawing.Point（8， 75）

　　RadioButton10.Name = "RadioButton10"

　　RadioButton10.Size = New System.Drawing.Size（80， 24）

　　RadioButton10.TabIndex = 3

　　RadioButton10.Text = "四楼"

　　'分别把它们添加到父控件GroupBox的Controls集合中

　　GroupBox1.Controls.Add（RadioButton1）

　　GroupBox1.Controls.Add（RadioButton2）

　　GroupBox2.Controls.Add（RadioButton3）

　　GroupBox2.Controls.Add（RadioButton4）

　　GroupBox2.Controls.Add（RadioButton5）

　　GroupBox2.Controls.Add（RadioButton6）

　　GroupBox3.Controls.Add（RadioButton7）

　　GroupBox3.Controls.Add（RadioButton8）

　　GroupBox3.Controls.Add（RadioButton9）

　　GroupBox3.Controls.Add（RadioButton10）

　　End Sub

　　把上一页的代码复制添加后，把控件初始化过程InitializeControl（）过程添加到Form1的New构造函数中，如下图二所示：

　　图二：在New构造函数中添加过程InitializeControl（）

　　现在按F5运行，Form1的窗体控件布局（如下图三所示）是不是和我们手工布局的图一的布局是一样的呢？

　　图三：使用代码动态生成的控件布局图

上一页  [1] [2] [3] 

【责编:John】