第八章 常用控件与系统对象

单选按钮
2. 重要属性 （1） Caption：文本标题。设置单选钮的文本注释内容。 ） ：文本标题。设置单选钮的文本注释内容。 属性： （2） Alignment属性： ） 属性 0：—Left Justify(缺省 控件钮在左边，标题显示在右边。 ： 缺省)控件钮在左边，标题显示在右边。 缺省 控件钮在左边 1：—Right Justify 控件钮在右边，标题显示在左边。 控件钮在右边，标题显示在左边。 ： （3）Value 属性 ） True: 单选钮被选定 单选钮被选定 单选钮未被选定 缺省设置） 选定（ False: 单选钮未被选定（缺省设置） （4） Style 属性 ） 0--Standard： 标准方式 1--Graphical：图形方式 ： ： 属性设置为1时 说 明： 在Style属性设置为 时，可使用 Picture 属性 属性设置为 未选定时的图标或位图）、 ）、DownPicture属性 选定时的 属性( （未选定时的图标或位图）、 属性 图标或位图)、 属性（ 图标或位图 、DisabledPicture属性（禁止选择时的图标或 属性 位图） 位图）
3. 方法
每调用一次SetFocus方法就会触发一次 方法就会触发一次Click事件 错)。 事件(错 。 每调用一次 方法就会触发一次 事件 value每改变一次就会触发一次 每改变一次就会触发一次Click事件。 事件。 每改变一次就会触发一次 事件
4. 事件
Click事件是检查框控件最基本的事件 。 用户一般无 事件是检查框控件最基本的事件。 事件是检查框控件最基本的事件 需为检查框编写Click事件过程，但其对 事件过程， 需为检查框编写 事件过程 但其对Value属性值的改 属性值的改 变遵循以下规则： 变遵循以下规则： 单击未选中的检查框时， 属性值变为0； 单击未选中的检查框时，Value属性值变为 ； 未选中的检查框时 属性值变为 单击已选中的检查框时， 属性值变为1； 单击已选中的检查框时，Value属性值变为 ； 已选中的检查框时 属性值变为 单击变灰的检查框时， 变灰的检查框时 属性值变为2。 单击变灰的检查框时，Value属性值变为 。 属性值变为
第八章
常用控件与系统对象
本章内容及要求： 本章内容及要求：
1. 掌握常用控件单选钮 掌握常用控件单选钮(OptionButton)、检查框 、 (CheckBox)、 框架 、 框架(Frame)、滚动条 、滚动条(ScrollBar)、 、 列表框(ListBox)、组合框（ComboBox)、时钟 列表框 、组合框（ 、 (Timer)等的常用、 属性、重要事件和方法的使用； 等的常用、 属性、重要事件和方法的使用； 等的常用 2.Active控件的添加方法。 控件的添加方法。 控件的添加方法 3. 了解剪贴板对象的使用。 了解剪贴板对象的使用。
事件： 事件：
框架可以响应的事件Click、 框架可以响应的事件Click、DblClick Click 一般不需要有关框架的事件过程。 一般不需要有关框架的事件过程。
单选钮、检查框及框架用法示例。 例8.2 单选钮、检查框及框架用法示例。
Private Sub cmdcancel_Click() Form_Load End Sub Private Sub cmdok_Click() If optsong.Value Then lblexample.FontName = optsong.Caption ‘宋体 Else lblexample.FontName = opthei.Caption ‘黑体 End If lblexample.FontBold = chkbold.Value ’加粗 lblexample.FontItalic = chkitalic.Value ‘倾斜 If optten.Value Then lblexample.FontSize = 10
• 检查框的 检查框的Value 属性与单选按钮不同，其值为数值型数 属性与单选按钮不同， 据，可取 0 , 1 , 2 检查框与单选按钮Value 属性的比较 检查框与单选按钮 单选钮 单选钮被选定 True: 单选钮被选定 单选钮未被选定 选定， False: 单选钮未被选定， 缺省设置 检查框 0--Unchecked：未被选定 ：未被选定 1--Checked：选定 ： 2--Grayed：灰色，禁止选择 ：灰色，
Private Sub Form_Load() optforecolor.Value = True lblexample.ForeColor = vbBlack lblexample.BackColor = vbWhite End Sub Private Sub optbackcolor_Click() lblexample.BackColor = QBColor(color) End Sub Private Sub optforecolor_Click() lblexample.ForeColor = QBColor(color) End Sub
8.1.3 框架 (Frame)
为控件提供可标识的分组。 Frame 控件为控件提供可标识的分组。当需要在同一 控件为控件提供可标识的分组 窗体内建立几组互独立的单选钮时， 窗体内建立几组互独立的单选钮时，就需要用框架将每一组 单选钮框框起来， 控件分成几组， 单选钮框框起来，把 OptionButton 控件分成几组，如下形 式。
2. 属性
(1) Value 滑块所处位置所代表的值。 滑块所处位置所代表的值。 (2) Max：最大值 ： -32,768~32,767 (3) Min：最小值 ： -32,768~32,767 (4) SmallChange 最小变动值， 最小变动值， 单击箭头时移动的增量值。 时移动的增量值 单击箭头时移动的增量值。 (5) LargeChange 最大变动值，单击空白处时移动的增量值 时移动的增量值。 最大变动值，单击空白处时移动的增量值。
Else lblexample.FontSize = 12 End If End Sub Private Sub Form_Load() optsong.Value = True chkbold.Value = 0 chkitalic.Value = 0 optten.Value = True lblexample.FontName = optsong.Caption lblexample.FontItalic = chkitalic.Value lblexample.Bold = chkbold.Value lblexample.FontSize = 10 End Sub
重要属性
1. Caption属性：框架标题 属性： 属性 2 Enabled属性：缺省为True (是否可使用） 属性：缺省为 是否可使用） 属性 是否可使用 False：标题呈灰色，不允许对框架内的所有对象 ：标题呈灰色， 进行操作。 进行操作。 3. Visible属性：（是否可见） 属性： 是否可见） 属性 True：框架及其控件可见。 ：框架及其控件可见。 False：框架及其控件被隐含起来。 ：框架及其控件被隐含起来。
4. 事件
Click事件是单选钮控件最基本的事件 ， 一般情况用户 事件是单选钮控件最基本的事件 事件是 单选钮控件最基本的事件， 无需为单选钮编写Click事件过程，因为当用户单击单选钮 事件过程， 单击单选钮 无需为单选钮编写 事件过程 因为当用户单击 它会自动改变状态 自动改变状态。 时，它会自动改变状态。 单选钮示例。 例8.1 单选钮示例。
3. 方法
4. 事件
（1）Change事件 ） 事件 滚动条的Change事件在移动滚动框或通过代码改变其 事件在移动滚动框或通过代码改变 滚动条的 事件在移动滚动框或通过代码改变其 Value属性值时发生。单击滚动条两端的箭头或空白处将引 属性值时发生。 滚动条两端的箭头或空白处 属性值时发生 单击滚动条两端的箭头或空白处将引 事件。 发Change事件。 事件 （2）Scroll事件 ） 事件 当滚动框被重新定位， 当滚动框被重新定位，或按水平方向或垂直方向滚动 被重新定位 事件发生。 时会触发Scroll事件 时，Scroll事件发生。拖动滑块时会触发 事件发生 拖动滑块时会触发 事件 Scroll事件与 事件与Change事件的 区别 在于 ： 当滚动条控件 事件的区别 在于： 事件与 事件的 区别在于 滚动时Scroll事件一直发生 ， 而 Change事件只是在滚动结 事件一直发生， 滚动时 事件一直发生 事件只是在滚动结 束之后才发生一次。 束之后才发生一次。
本章重点： 本章重点：
常用控件单选钮、检查框、 框架、滚动条、 常用控件单选钮、检查框、 框架、滚动条、 列表框(ListBox)、组合框（ComboBox)、时钟 列表框 、组合框（ 、 (Timer)等的常用 属性、重要事件和方法的使用； 等的常用 属性、重要事件和方法的使用；
本章难点： 本章难点：
3. 方法
SetFocus方法是 单选钮控件最常用的方法，可以在代 方法是 单选钮控件最常用的方法， 方法 码中通过该方法将Value属性设置为 码中通过该方法将 属性设置为True。 。 属性设置为 该方法之前， 与命令按钮相同，使用该方法之前 必须要保证单选 与命令按钮相同，使用该方法之前，必须要保证单选 钮处于可见和可用状态（ 钮处于可见和可用状态 （ 即 Visible与 Enabled属性值均为 与 属性值均为 True）。 ）
设Caption为 "字体" 框架
框架内控件的创建方法： 框架内控件的创建方法：
为了将控件分组，首先需要绘制 Frame 控件，然后 为了将控件分组，首先需要绘制 控件， 绘制 Frame 里面的控件。这样就可以把框架和里面的控 里面的控件。这样就可以把框架和里面的控 件同时移动。如果在 Frame 外部绘制了一个控件并试图 同时移动。 把它移到框架内部，那么控件将在 Frame 的上部，这时 把它移到框架内部， 的上部， 需分别移动 Frame 和控件 方法1：单击工具箱上的工具，然后用出现的“ 指 方法 ：单击工具箱上的工具，然后用出现的“+”指 在框架中适当位置拖拉出适当大小的控件。 针，在框架中适当位置拖拉出适当大小的控件。 不能使用双击工具箱上工具的自动方式。 不能使用双击工具箱上工具的自动方式。 方法2：将控件“剪切” 到剪贴板， 方法 ：将控件“剪切”(Ctrl+X)到剪贴板，然后选中 到剪贴板 框架， 命令粘贴到框架内。 框架，使用 (Ctrl+V)命令粘贴到框架内。 命令粘贴到框架内