第六章Visual Basic程序设计

• • • • • Caption Alignment ：0－标题靠左 ,1－标题靠右,2－标题居中 Autosize: True － 自动调整大小, False－保持设计时的大小 BorderStyle : 0 － 标签无边框, 1 － 标签有边框 BackStyle : 0 － 标签覆盖背景, 1 － 标签透明
2.4.1 标签(Label) 标签主要用于显示一小段文本,通常用来标注本身不具有Caption 属性的控件。 属性：BackColor，ForeColor, BackStyle FontName，FontSize，FontBold，FontItalic，FontUnderLine， Height, Left, Top, Width 其它常用属性：
河北理工大学理学院
6.2 选择性控件
• ListCount：P 项目的数量，ListCount-1是最后一项的 下标。 • Sorted：D True：按字母顺序排列； False：按加入先 后顺序排列。
• Text：P 列表项中被选定的内容：
List 1.List(List 1.ListIndex) = List1.Text
List1.ListIndex = 3 (下标从0开始的)
List1. ListCount = 5 List1. Selected(3) = True，其余为False。 List1. Sorted = False，没有排序。 List1. Text 为 “cox” ，
与List1. List(List1. ListIndex)相等
– 对象.RemoveItem index – 该方法将指定位置的项目删除，同时ListCount自动减1
• Clear
– 对象.Clear – 清除所有项目，ListCount置0
例[6-15] 组合框示例 （如下图）。
河北理工大学理学院
6.3 滚动条
作用：附在窗体上协助观察数据或确定位置， 作为数据输入的工具。
• Default
该属性被设置True时，若窗体中所有的按钮都不具有焦点，则按回 车键与单击该命令的按钮作用相同。在一个窗体中，只允许有一个 命令按钮的Default属性设为True
事件
• Click，无双击事件
e.g.
2-9
河北理工大学理学院
6.2 选择性控件
6.2.1 单选钮(OptionButton)和检查框 (CheckBox)
• Style=2时，可响应Click和Dropdown事件。
组合框的主要方法
• AddItem
– 对象.AddItem item [, index] – index: 0～ListCount-1.每插入一项ListCount自动加1
河北理工大学理学院
6.2 选择性控件
• RemoveItem
河北理工大学理学院
2.4 基本控件
事件
• Change
• GotFocus，LostFocus
• tFocus
e.g. 2-8
河北理工大学理学院
2.4 基本控件
2.4.3 命令按钮（Command Button） 属性
• Caption &加字母，字母成为快捷键，运行时按住ALT键加字母相当 于点击按钮。 • Cancel 该属性设为True时，按键盘上的Esc键与单击该命令作用相同。在 一个窗体中，只允许有一个按钮的Cancel属性设为True
河北理工大学理学院
6.2 选择性控件
主要事件：Click ，因为单击时自动改变状态， 故不需要编写。
例［6-10］ 用单选钮和检查框设置文本框的字 体示例（如下图） 。

河北理工大学理学院
6.2 选择性控件
框架(Frame) 作用：①放置一组单选钮②美观
创建：建立框架→画出其它控件
功能：表示“选中”和“不选”两种状态。单 选钮用“●”,而检查框用“√”表示选中
主要属性:Name, Caption，Value
单选钮Value: (逻辑型) True － 被选中 False－未被选中 检查框Value ：(数值型） 0 － 检查框未被选中 1 － 检查框被选中 2 － 检查框被禁止操作， 显示灰色
事件：click，dblclick 标签很少用来触发事件。 e.g. 2-7
河北理工大学理学院
2.4 基本控件
2.4.2 文本框（TextBox） 属性
• Text
• MaxLength
• MultiLine • PasswordChar • ScrollBars 和垂直 • SelLength • SelStart • SelText • Locked 能编辑
河北理工大学理学院
6.3 滚动条
事件：
• Scroll: 拖动滑块时触发。
• Change：滚动条内滑块位置改变时发生。
例[6-17]设计一个用于设置速度的滚动条。
河北理工大学理学院
6.4 时钟控件(Timer)
作用：以一定的时间间隔激发计时器事件而执行相应 的程序代码。 属性:
• Clear方法
– 格式：列表框名.Clear
– 该方法用于清除列表框中的所有项目，此时ListCount属 性值置0。
河北理工大学理学院
6.2 选择性控件
• RemoveItem方法
– 格式：列表框名.RemoveItem 位置值 – 该方法将指定位置上的项目从列表框中删除，此时 ListCount属性值自动减1。
河北理工大学理学院
2.4 基本控件
注意：
• 1.不是所有的控件都能接受焦点，如Timer，shape。 • 2.只有窗体内的所有控件都不能接受焦点时，窗体才能接受焦 点 • 3.某一控件获得焦点时，其它控件将失去焦点 • 4.只有当控件的Enable和Visible属性均为True时，控件才能 接受焦点
设置文本框中允许输入的最大字符数
True － 文本框中允许输入多行文字 默认值为空。若为非空字符，一般为“*”号 0－没有滚动条 1－水平 2－垂直 3－水平
文本框中当前选中的字符个数。运行时使用 文本框中当前选中的字符中第一个字符的位置 文本框中当前选中的文字内容 True －文本框内容可编辑 False－文本框内容不
控件获得焦点的途径：
• 1. 直接操作： 按Tab键，快捷键，鼠标点击
• 2. 程序代码： 调用SetFocus方法。如text1.SetFocus
河北理工大学理学院
2.4 基本控件
Tab顺序
• Tab顺序是指程序运行中用户按下Tab键时，焦点在控件上移 动的顺序,通常Tab顺序就是控件对象建立的顺序 • Tab顺序的调整：调整控件的TabIndex属性值 • TabIndex属性值决定控件的Tab键顺序
属性：Name、Visible、Caption、Enabled
框架内的所有控件随框架一起移动、显示、消 失和屏蔽。
事件： click和Dblclick事件，一般不编。
河北理工大学理学院
6.2 选择性控件
例［6-12］框架的应用示例（如下图）。
河北理工大学理学院
6.2 选择性控件
6.2.2列表框（ListBox)和组合框(ComboBox) 列表框
列表框的特有的重要属性
• Selected：P 逻辑数组 Selected(i)的值为True表示 第i+1项被选中。 • MultiSelect：0-None：禁止多项选择； 1-Simple：简 单多项选择； 2-Extended：扩展多项选择。
河北理工大学理学院
6.2 选择性控件
列表框各主要属性的值：
河北理工大学理学院
6.1 图形控件
图片框的Autosize 属性：决定控件是 否自动适应图片的 大小
图6-1 AutoSize属性为False • true：图片框自动 调整大小适应图片。
• false：图片框不能 自动调整大小，加 载的图形保持其原 始尺寸。
• 作用：显示多个选择项，供用户选择。
• 特征：只能从其中选择，而不能直接修改其中的内容。
列表框和组合框共有的重要属性 (P：可在程序 中设置或引用，D：可在设计状态设置。)
• List ：PD 字符型数组，存放列表框的项目，下标是 从0开始。 • ListIndex：P 选中的项目的序号，没有项目被选定 时为-1
属性：
• Max：最大值（-32768~32767） • Min：最小值（-32768~32767）
• SmallChange：用户单击滚动条两端箭头时, 滑块 移动的增量值.
• LargeChange：用户单击滚动条的空白处，滑块移 动的增量值。 • Value：滚动条内滑块所处位置所代表的值。
Visual Basic程序设计
理学院 樊秋红
第六章 常用控件
2.4 基本控件 6.2 选择性控件 6.3 滚动条 6.4 时钟控件
6.1 图形控件
6.5 高级控件
6.6 综合应用举例
河北理工大学理学院
2.4 基本控件
2.4.4 焦点和Tab顺序 2.4.5 控件的默认属性 2.4.1 标签 2.4.2 文本框
2.4.3 命令按钮
河北理工大学理学院
2.4 基本控件
2.4.4 焦点和Tab顺序 焦点:焦点是指控件对象接受鼠标或键盘输入的 能力。当某一控件对象具有焦点时,就可以接受 用户的输入操作,并且只有具有焦点的控件对象 才能接受用户由鼠标和键盘的输入。 当某一控件对象获得焦点时，将触发该控件 对象的GotFocus事件，当失去焦点时，将触 发LostFocus事件。
6.1 图形控件
6.1.1图片框和图像框 图片框：主要用来显示图片图象。 • （1）在设计阶段装入图片：改变属性窗口中的 Picture属性 • （2）在运行期间装入图片 对象名.Picture=LoadPicture([filename]) 如： Picture1.Picture=LoadPicture("c:\windows\Bubble s.bmp") 删除图片框的图形也同样使用LoadPicture，如： Picture1.Picture= LoadPicture()