vb-net控件 vbnet控件连接access

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

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

我们对控件进行分组的原因不外乎三个

为了获得清晰的用户界面而将相关的窗体元素进行可视化分组

编程分组如对单选按钮进行分组

为了在设计时将多个控件作为一个单元来移动

在中有GroupBox Panel TabControl这三个控件可以实现上面所提到的三个分组目的所以我们称它们为分组控件

这三个控件在功用上十分的相似特别是GroupBox和Panel控件只存在一点细微的差别而已（这个差别是只有GroupBox控件可以显示标题而只有Panel控件可以有滚动条）这里我们就先来了解GroupBox控件的使用

GroupBox（控件组）控件一般是作为其他控件的组的容器的形式存在的这样有利于用户识别使界面变得更加友好（GroupBox控件相当于Visual Basic以前版本的Frame控件）使用控件组控件可以将一个窗体中的各种功能进一步进行分类例如将各种选项按钮控件分隔开

当移动单个GroupBox控件时它所包含的所有控件也将一起移动

在大多数情况下对控件组控件没有实际的操作我们用它对控件进行分组通常没有必要响应它的事件不过它的Name Text和Font等属性可能会经常被修改以适应应用程序在不同阶段的要求

GroupBox控件在工具箱中的图标如图所示

一 GroupBox控件的常用属性

Anchor和Dock 这两个属性是所有有用户界面的控件都有的定位属性这里就不啰嗦了

Name属性标识控件的对象名称

Text属性显示在GroupBox控件右上方的标题文字可以用来标识该控件组的描述

Font和ForeColor属性用于改变GroupBox控件的文字大小以及文字的颜色需要注意的时候它不单改变GroupBox控件的Text属性的文字外观同时也改变其内部控件的显示的Text属性的文字外观

二创建一组控件

在窗体上放置GroupBox控件从工具箱中拖放一个GroupBox控件到窗体上的合适位置调整大小

在属性窗口中改变GroupBox控件的Text属性作为它的标题

在GroupBox控件内拖放其它需要的控件例如RadioButton控件

设置示例如图一所示

图一用控件组控件对单选按钮分组

我们在拖动单个GroupBox控件的时候它内部的控件也会随着移动以保持和GroupBox的相对位置不变同理删除GroupBox控件时它所包含的所有控件也会被删除掉

当我们调整GroupBox控件所包含的控件的Anchor和Dock属性的时候其参照物将不是Form窗体而是GroupBox控件了

三编程添加GroupBox控件以及它所包含的控件

虽然GroupBox控件是在设计时用视图设计布局效果最好但是无可避免地很多特殊情况下也是需要在运行做添加控件到控件组中的这里我们就用代码来完成上图一界面的绘制

动态添加控件一般需要经过下面三个步骤

创建要添加的控件实例

设置新控件的属性

将控件添加到父控件的 Controls 集合

在Form 代码的任意位置增加初始化控件的过程InitializeControl（）代码如下所示

Sub InitializeControl（）

首先添加Label和TextBox控件

Dim Label As New System Windows Forms Label

Dim TextBox As New System Windows Forms TextBox

Label

Label Location = New System Drawing Point（）

Label Name = Label

Label Size = New System Drawing Size（）

Label TabIndex =

Label Text = 户主姓名

TextBox

TextBox Location = New System Drawing Point（）

TextBox Name = TextBox

TextBox Size = New System Drawing Size（）

TextBox TabIndex =

TextBox Text =

把它们添加到父控件Form 的Controls集合中

Me Controls Add（TextBox ）

Me Controls Add（Label ）

添加三个GroupBox控件

Dim GroupBox As New System Windows Forms GroupBox

GroupBox

GroupBox BackColor = System Drawing SystemColors Control

GroupBox Location = New System Drawing Point（）

GroupBox Name = GroupBox

GroupBox Size = New System Drawing Size（）

GroupBox TabIndex =

GroupBox TabStop = False

GroupBox Text = 性别

GroupBox

GroupBox Location = New System Drawing Point（）

GroupBox Name = GroupBox

GroupBox Size = New System Drawing Size（）

GroupBox TabIndex =

GroupBox TabStop = False

GroupBox Text = 单元

GroupBox

GroupBox Location = New System Drawing Point（）

GroupBox Name = GroupBox

GroupBox Size = New System Drawing Size（）

GroupBox TabIndex =

GroupBox TabStop = False

GroupBox Text = 楼层

把它们添加到父控件Form 的Controls集合中

Me Controls Add（GroupBox ）

添加RadioButton控件并分别绘制在GroupBox控件内

Dim RadioButton As New System Windows Forms RadioButton

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 男性

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 女性

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 二单元

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 三单元

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 一单元

RadioButton

RadioButton BackColor = System Drawing SystemColors Control

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 四单元

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 二楼

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 三楼

RadioButton

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 一楼

RadioButton

RadioButton BackColor = System Drawing SystemColors Control

RadioButton Location = New System Drawing Point（）

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size（）

RadioButton TabIndex =

RadioButton Text = 四楼

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

GroupBox Controls Add（RadioButton ）

End Sub

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

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

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

lishixinzhi/Article/program/ASP/201311/21749

相关问答

Q1: VB.NET中的TextBox控件详解

TextBox组件（文本框组件）是一种常用的也是比较容易掌握的组件应用程序主要使用它来接收使用者于输入文字信息在前面内容中已经或多或少的接触到TextBox组件本节就来详细探讨一下Visual 中TextBox组件的使用方法一 TextBox组件 TextBox类当我们使用Visual Basic Net集成开发环境开发应用程序时在从【工具箱】的【Windows窗体】选项卡中向Form 的设计窗体拖入一个TextBox组件的后我们可能并没有感觉到即使时这样一个简单的操作 Visual Basic Net都做了很多幕后工作主要工作和步骤如下首先实例化System Windows Forms TextBox类并根据拖动到窗体的位置和形状分别设定TextBox实例的各个属性我们看到的设计窗体其实是Form 类的一个实例而Form 类首先是从System Windows Forms Form类继承而来 Form 类中的成员根据使用者往窗体中拖入的组件不同而不同各个成员通过Add或AddRange方法加入到Form 中这样拖入的组件才能够显示在设计窗体上以上这些都完全不同于以前Visual Basic 通过上述步骤我们不难得到TextBox组件和TextBox类之间的关系 TextBox组件是命名空间System Windows Forms中的TextBox类的实例在从【工具箱】的【Windows窗体】选项卡中拖入窗体的任一组件都是 Net框架类库—— Net Framework SDK中封装的某一个类的实例通过上述步骤也不难看出 Visual Basic Net的确才是真正的面向对象（OOP）的开发语言二 TextBox类的成员 TextBox组件使用虽然比较简单但TextBox类的构成成员却是非常的丰富在一般性的编程中主要涉及到三类属性方法和事件表表和表分别是TextBox类的常用属性方法和事件及其简单说明属性说明 AcceptsReturn 指示在多行TextBox组件中按ENTER键时是在组件中创建一行新文本还是激活窗体的默认按钮 AcceptsTab 该值指示在多行文本框组件中按TAB键时是否在组件中键入一个TAB字符而不是按选项卡的顺序将焦点移动到下一个组件 AllowDrop 获取或设置一个值该值指示组件是否可以接受用户拖放到它上面的数据 Anchor 获取或设置组件的哪些边缘锚定到其容器边缘 BackColor 获取或设置组件的背景色 BackgroundImage 获取或设置在组件中显示的背景图像 BorderStyle 获取或设置文本框组件的边框类型 Bottom 获取组件的下边缘与其容器的工作区的上边缘之间的距离 CanFocus 获取一个值该值指示组件是否可以接收焦点 CanSelect 获取一个值该值指示是否可以选中组件 CanUndo 获取一个值该值指示用户在文本框组件中能否撤消前一操作 CharacterCasing 获取或设置TextBox组件是否在字符键入时修改其大小写格式 ContextMenu 获取或设置与组件关联的快捷菜单 Reated 获取一个值该值指示组件是否已经创建 Cursor 获取或设置当鼠标指针位于组件上时显示的光标 DataBindings 为该组件获取数据绑定 Dock 获取或设置组件停靠到父容器的哪一个边缘 Enabled 获取或设置一个值该值指示组件是否可以对用户交互作出响应 Focused 获取一个值该值指示组件是否有输入焦点 Font 获取或设置组件显示的文字的字体 ForeColor 获取或设置组件的前景色 MaxLength 获取或设置用户可以在文本框组件中最多键入的字符数 Multiline TRUE/FALSE 该值指示它是否为多行文本框组件 PasswordChar 获取或设置字符该字符用于屏蔽单行 ScrollBars 获取或设置哪些滚动条应出现在多行TextBox 组件中 Text 获取或设置文本框中的当前文本 TextAlign 设置文本框内文本得对齐方式 TextLength 获取组件中文本的长度　表 TextBox类的常用属性及其说明方法说明 AppendText 向文本框的当前文本追加文本 Clear 从文本框控件中清除所有文本 ClearUndo 从该文本框的撤消缓冲区中清除关于最近操作的信息 Copy 将文本框中的当前选定内容复制到剪贴板 Cut 将文本框中的当前选定内容移动到剪贴板中 DoDragDrop 开始拖放操作 Focus 为控件设置输入焦点 GetChildAtPoint 检索位于指定坐标处的子控件 GetNextControl 按照子控件的Tab键顺序向前或向后检索下一个控件 Hide 对用户隐藏控件 Paste 用剪贴板的内容替换文本框中的当前选定内容 PointToClient 将指定屏幕点的位置计算成工作区坐标 PointToScreen 将指定工作区点的位置计算成屏幕坐标 ResetBindings 将DataBindings属性重置为其默认值 Select 选择控件中的文本 SelectAll 选定文本框中的所有文本 SelectNextControl 激活下一个控件 Show 向用户显示控件 SuspendLayout 临时挂起控件的布局逻辑 Undo 撤消文本框中的上一个编辑操作

表 TextBox类的常用方法及其说明

事件说明 Click 在单击文本框时发生 CursorChanged 当 Cursor 属性的值更改时发生 DoubleClick 在双击控件时发生 DragDrop 在完成拖放操作时发生 DragEnter 在将对象拖入控件的边界时发生 DragLeave 在将对象拖出控件的边界时发生 DragOver 在将对象拖到控件的边界上发生 EnabledChanged Enabled 属性值更改后发生 Enter 进入控件时发生 GiveFeedback 在执行拖动操作期间发生 GotFocus 在控件接收焦点时发生 KeyDown 在控件有焦点的情况下按下键时发生 KeyPress 在控件有焦点的情况下按下键时发生 KeyUp 在控件有焦点的情况下释放键时发生 Leave 在输入焦点离开控件时发生 LostFocus 当控件失去焦点时发生 MouseDown 当鼠标指针位于控件上并按下鼠标键时发生 MouseEnter 在鼠标指针进入控件时发生 MouseHover 在鼠标指针悬停在控件上时发生 MouseLeave 在鼠标指针离开控件时发生 MouseMove 在鼠标指针移到控件上时发生 MouseUp 在鼠标指针在控件上并释放鼠标键时发生 MouseWheel 在移动鼠标轮并且控件有焦点时发生 Move 在移动控件时发生 Paint 在重绘控件时发生 Resize 在调整控件大小时发生

TextBox类的常用事件及其说明当然TextBox类除了上述的属性方法和事件还有很多属性方法和事件和很多受保护的方法和受保护的属性由于它们使用的几率较少和篇幅所限就不能一一介绍了感兴趣的朋友可以参阅相关资料

三．掌握TextBox组件的基本用法由于TextBox类的成员实在太丰富一个示例要想介绍上述所有的方法属性和事件是不可能在下面介绍的示例中将突出介绍在Visual 集成开发环境下通过对设定不同的属性值实现三种常见的TextBox组件式样以及TextBox组件的方法的调用方法和在Visual Basic Net集成开发环境中如何加入TextBox组件不同事件对应的处理代码让各位更加熟悉TextBox类和Visual Basic Net开发环境下面是TextBox示例的具体实现步骤启动Visual Studio Net 选择菜单【文件】|【新建】|【项目】后弹出【新建项目】对话框将【项目类型】设置为【Visual Basic项目】将【模板】设置为【Windows应用程序】在【名称】文本框中输入【TextBox组件】在【位置】的文本框中输入【E:\项目】然后单击【确定】按钮这样在 E:\VS NET项目目录中就产生了名称为 TextBox组件的文件夹并在里面创建了名称为 TextBox组件的项目文件把Visual Studio Net的当前窗口切换到【Form VB（设计）】窗口并从【工具箱】中的【Windows窗体组件】选项卡中往Form 窗体中拖入下列组件并执行相应操作三个Label组件三个TextBox组件分别为TextBox TextBox 和TextBox 按照表中数值来设定设定组件的主要属性请注意TextBox组件中的属性设定值

表【TextBox组件】项目窗体中各组件的主要属性设定数值表

按照表各值设定后的TextBox组件三种常用的式样也就产生了具体如图所示

图程序设计时TextBox组件三种常见使用方法

这三种式样就是单行的TextBox组件多行的TextBox组件和用以输入类似密码数据的TextBox组件为TextBox 组件添加事件和事件的处理代码此次添加的事件的名称是Leave 当TextBox 组件失去焦点时触发此事件添加TextBox 组件的其他事件也可仿照下面的处理方法下面是利用Visual Basic Net在【TextBox组件】项目中添加TextBox 组件的Leave事件和添加Leave事件的处理代码的具体步骤首先把Visual Basic Net的当前窗口切换到Form vb的代码编辑界面然后在如图所示的选择框中选择TextBox

图选择TextBox组件

之后在图所示的选择框中选择 Leave

图选取Leave事件

在选择 Leave 之后 Visual Basic Net会自动在Form vb中产生TextBox 的Leave事件在Leave事件的事件处理代码区添加下列代码下面代码调用了TextBox 组件的 Clear 方法并且显示一个TextBox 组件失去焦点的提示框

TextBox Clear ( ) 清除TextBox 组件的显示内容MsgBox ( 失去焦点！ ) 弹出提示框

至此【TextBox组件】项目的全部工作就完成了图是程序编译后运行界面

图【TextBox项目】的运行界面

lishixinzhi/Article/program/net/201311/12721

Q2: 如何轻松调整VB.NET控件

Anchor属性可以被设定为Top Bottom Left和Right的任何组合默认设置是Top Left 这可以保持控件的top left角与视窗边框具有相同的相对位置设置Anchor属性为Top and Bottom可以垂直地调整控件保证从视窗底部到控件底部距离相同

Me TextBox Anchor = （System Windows Forms AnchorStyles Top Or System Windows Forms AnchorStyles Left）

Dock属性