VB.NET還是比較常用的，于是我研究了一下VB.NET GroupBox控件，在這里拿出來和大家分享一下，希望對大家有用。

編程添加VB.NET GroupBox控件以及它所包含的控件.雖然VB.NET GroupBox控件是在設計時用視圖設計布局效果最好，但是無可避免地，很多特殊情況下也是需要在運行做添加控件到控件組中的，這里我們就用代碼來完成上圖一界面的繪制。

動態添加控件一般需要經過下面三個步驟：
1、創建要添加的控件實例
2、設置新控件的屬性。
3、將控件添加到父控件的 Controls 集合。

在Form1代碼的任意位置增加初始化控件的過程InitializeControl（），代碼如下所示：

Sub InitializeControl（）  
'首先添加Label和TextBox控件  
Dim Label1 As New System.Windows.Forms.Label  
Dim TextBox1 As New System.Windows.Forms.TextBox  
'Label1  
Label1.Location = New System.Drawing.Point（8， 8）  
Label1.Name = "Label1" 
Label1.Size = New System.Drawing.Size（64， 16）  
Label1.TabIndex = 1  
Label1.Text = "戶主姓名" 
'TextBox1  
TextBox1.Location = New System.Drawing.Point（72， 7）  
TextBox1.Name = "TextBox1" 
TextBox1.Size = New System.Drawing.Size（128， 21）  
TextBox1.TabIndex = 2 
TextBox1.Text = "" 
'把它們添加到父控件Form1的Controls集合中  
Me.Controls.Add（TextBox1）  
Me.Controls.Add（Label1）  
'添加三個GroupBox控件  
Dim GroupBox1 As New System.Windows.Forms.GroupBox  
Dim GroupBox2 As New System.Windows.Forms.GroupBox  
Dim GroupBox3 As New System.Windows.Forms.GroupBox  
'GroupBox1  
GroupBox1.BackColor = System.Drawing.SystemColors.Control  
GroupBox1.Location = New System.Drawing.Point（8， 40）  
GroupBox1.Name = "GroupBox1" 
GroupBox1.Size = New System.Drawing.Size（96， 104）  
GroupBox1.TabIndex = 3 
GroupBox1.TabStop = False 
GroupBox1.Text = "性別" 
....... 

把上一頁的代碼復制添加后，把控件初始化過程InitializeControl（）過程添加到Form1的New構造函數中就OK了。

【編輯推薦】

1. 詳解VB6.0和VB.NET窗體的區別
2. 概括VB.NET創建WebService
3. VB.NET Account對象簡介
4. 簡單描述VB.NET數據窗體
5. 深入解析VB.NET創建表示層