《Visual Basic程序设计与实训教程》第7章：常用控件

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

第7章 常用标准控件7.1 定时器型 7.2 单选按钮和复选框 7.3 框 架 7.4 列表框和组合框 7.5 滚动条 7.6 焦点和 焦点和Tab顺序 顺序2011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

【目的要求】 1. 掌握定时器的应用 2. 掌握单选按钮和复选框的属性和应用 3. 了解框架的应用 4. 掌握列表框和组合框的应用 5. 了解滚动条 6. 了解焦点和Tab顺序 【重点】定时器、单选按钮和复选框、列表框和组合框 【难点】各控件的应用2011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

7.1 定时器7.1.1定时器的属性和事件 7.1.1定时器的属性和事件 1.常用属性 1.常用属性 (1) Interval属性 Interval属性返回或设置定时器控件计时的时间间隔(单位：毫秒) 。其有效 范围为0~65535。默认值为0,此时定时器无效。

(2) Enabled属性 属性定时器是否被激活，它有True或False 两种属性值。当其设为 True时，定时器被激活。

2.常用事件 2.常用事件定时器控件最常用的事件就是Timer事件。 每经过一个由Interval属性的时间间隔，便会产生一个Timer事 件。2011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

7.1.2定时器的应用举例 定时器的应用举例 【例7.1】建立一个实时时钟。程序界面设计如图7-2所 示，程序运行结果如图7-2所示。 在VB中可以用Time函数获取系统的时间。

图7-12011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

在命令按钮【开始】事件过程Command1_Click()中添加如下代码： Private Sub Command1_Click() Timer1.Enabled = True End Sub 在命令按钮【停止】事件过程Command1_Click()中添加如下代码： Private Sub Command2_Click() Timer1.Enabled = False End Sub 在时钟控件的触发事件过程中添加如下代码： Private Sub Timer1_Timer() Label1.Caption = Time End Sub

2011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

【例7.2】建立一个文字移动的动画程序。程序运行结果 如图7-3所示。分析：文字移动可以利用标签的move属性。如果每隔一段时间 就让标签移动一次就能产生动画的效果，用时钟控件的timer 事件正好可以实现每隔一段时间执行一次事件过程。用移动量 的正负可以实现左右移动。把标签移动的代码写在timer事件 过程中就可以实现文字移动的动画效果。

图7-32011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

编写程序代码 Dim cx As Integer '定义一个移动增量 Private Sub Command1_Click() Timer1.Enabled = True End Sub Private Sub Command2_Click() Timer1.Enabled = False End Sub Private Sub Form_Load() Timer1.Enabled = False cx = 50 End Sub Private Sub Timer1_Timer() Label1.Move Label1.Left + cx '标签移动 If Label1.Left + Label1.Width > ScaleWidth Then cx = -50 '移到右边时开始向左移动 If Label1.Left <= 0 Then cx = 50 '移到左边时开始向 右移动 2011-1-17 7 End Sub 清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

7.2 单选按钮和复选框7.2.1单选按钮 单选按钮控件(OptionBotton

)通常成组出现，主要用于处理“多 选一”的问题。 1.常用属性 常用属性 Value属性 (1) Value属性 用于设置单选按钮状态。True表示选定；False表示未选定。 (2) Caption属性 Caption属性 显示出现在单选按钮旁边的文本。 Alignment属性 (3) Alignment属性 用于设置单选按钮旁边的文本在圆圈的左边或者右边。其值为0或 1。值为0时表示控件钮在左边，标题显示在右边；值为1时，反之。 Style属性 (4) Style属性 用于设置单选按钮外观。其值为0或1。值为0时为标准样式；值为 1时外观类似于命令按钮。2011-1-17

清华大学出版社

本章学习目的要求：1. 掌握定时器的应用;2. 掌握单选按钮和复选框的属性和应用;3. 了解框架的应用; 4. 掌握列表框和组合框的应用;5. 了解滚动条; 6. 了解焦点和Tab顺序。

2.常用事件 常用事件单选按钮控件(OptionBotton)常用事件是Click事件。 【例7.3】设计一个程序，界面 …… 此处隐藏：3277字，全部文档内容请下载后查看。喜欢就下载吧 ……