问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

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

发布网友 发布时间:2023-04-01 15:36

我来回答

1个回答

热心网友 时间:2023-11-21 14:47

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

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

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

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

  在中 有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

  Dim GroupBox As New System Windows Forms 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 )

  Me Controls Add(GroupBox )

  Me Controls Add(GroupBox )

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

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  Dim RadioButton As New System Windows Forms RadioButton

  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 )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  GroupBox Controls Add(RadioButton )

  End Sub

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

  

  图二 在New构造函数中添加过程InitializeControl()

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

  

lishixin/Article/program/ASP/201311/21749
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
什么是家族办公室? 什么是家族办公室?一次讲清楚! 家庭财富管理与传承发展之第五章 家族办公室功能和优势简析 \"薛定谔的猫\"是什么?和动物相关的著名实验有哪些? 谁能帮我找到罗伯特•西尔弗伯格的短篇科幻小说《借体者》,重奖... 克隆人挑战了社会伦理吗? 神舟十三号发射直播时间几点开始?附直播地址 华为手机纯净模式如何关掉? 华为纯净模式关闭有什么影响 手机纯净模式可以关吗 招财树可以摆放在哪个方向 招财树放到什么位置合适 工艺品招财树放如何摆放最旺财 2019年福建二本线分数 纸蜘蛛如何剪 蜘蛛卡纸手工教程 蜘蛛折纸简单的折法 蜘蛛纸飞机怎么折具有超强滑翔能力 礼记曲礼翻译及解析 曲礼是什么意思 急救设备的设备定义 中药古今研究:高良姜 天猫精灵和小度那个电视免费的多 头发700块钱一斤贵不贵 房间太潮湿怎么办最快的办法 房间太潮湿可以打开空调除湿功能 3a的负三次方等于多少? a的负一次方是多少 已知行列式3阶,[A]=3,求[3A负一此方] [3A的负一次方]应该是指倒数吗? 江和沱最有可能分别指的是哪两条江 江南秋 古诗词 求‘两江珥其市,九桥带其流’的出处及意思。 放置控件到窗体中最迅速的方法是 推荐杏子的吃法 这样吃味道好营养高 多功能挂烫机可以清理鞋子吗? 西安体育学院招生办电话 2023西安体育学院体育类招生简章(运动训练、武术与民族传统体育专业) 什么是物理原始问题 3道原始初2物理 煮豆浆不放消泡剂会更香吗为什么 豆浆怎样弄没泡泡 欣雅卫生纸2000克的长款是什么 错误的管理方式 团队从鼎盛到衰落,就是因为犯了这10个管理错误 一个唱红脸一个唱白脸,这样的教育方式是错误的,你还在用吗? 当我们吼孩子的时候,实际上是在用伤害自己的方式来管教他 绑了qq号怎么解绑手机号? 保时捷卡宴有没有混动的 保时捷卡宴混动怎么样 保时捷卡宴混动怎么切换 保时捷卡宴油电混合车坏了怎么推动 保时捷卡宴油电混合多少钱(保时捷卡宴插电式混合动力)