VB.NET GroupBox控件学习经验

来源:百度文库 编辑:神马文学网 时间:2024/05/03 01:33:33
  这里介绍编程添加VB.NET GroupBox控件以及它所包含的控件.虽然VB.NET GroupBox控件是在设计时用视图设计布局效果最好,但是无可避免地。

  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. 简要介绍VB System.Array类及其成员

     2. 原创Blog:VB无所不能之一——指针

     3. 用VB.NET为智能设备编写半自动初始化类