《Visual Basic 6.0程序设计》课程教学资源（PPT课件）第四章 常用控件与窗体

第四章常用控件与窗体 41选择性控件 42时钟 43菜单设计 4.4多重窗体

第四章 常用控件与窗体 4.1 选择性控件 4.2 时钟 4.3 菜单设计 4.4 多重窗体

a Form1 如b程序设注 41选择性控件 C宋体 下划线 ◆单选钮( optionbutton) 必须成组出现,用户在一组单选钮中必须选择也只能选择一项。 ◆检查框( checkbox) 用户根据需要选定其中的一项或多项。 属性: caption:设置文本注释内容,即单选钮或检查框边上的文本注释。 > Alignment:设置一个值,决定单选钮或检查框控件中的文本的对齐方式。 Value:表示单选钮或检查框的状态。为默认属性

◆ 单选钮（optionbutton): 必须成组出现，用户在一组单选钮中必须选择也只能选择一项。 ◆ 检查框 (checkbox): 用户根据需要选定其中的一项或多项。  属性： ➢ caption: 设置文本注释内容，即单选钮或检查框边上的文本注释。 ➢ Alignment：设置一个值，决定单选钮或检查框控件中的文本的对齐方式。 ➢ Value ：表示单选钮或检查框的状态。为默认属性。 4.1 选择性控件

◆框架( Frame): 可以用来对其他控件进行分组,以便于用户识别。使用 结束 框架控件可以将一个窗体中的各种功能进一步进行分类, 让他们的操作互不影响。 ◆列表框( listbox): 列表框是显示项目列表的控件,从中可以选择一项或多 学生姓 显示学生籍贯 项。列表框的内容可以选择,但不能修改。 哈尔滨 属性:Iit; listindex, listcount; selected sorted text; multselect 方法: additem, removeitem, clear

◆ 框架（Frame）： 可以用来对其他控件进行分组，以便于用户识别。使用 框架控件可以将一个窗体中的各种功能进一步进行分类， 让他们的操作互不影响。 ◆ 列表框 (listbox)： 列表框是显示项目列表的控件，从中可以选择一项或多 项。列表框的内容可以选择，但不能修改。 属性: list, listindex ,listcount, selected, sorted, text, multselect. 方法: additem ，removeitem，clear

a Form1 李若嘉 下拉式组合框 简单组合框 下拉式列表框 ◆组合框(mboB0x)国 是一种同时具有文本框和列表框特性的控件。它可以像列表框一样,让用户 通过鼠标选择所需要的项目,也可以像文本框那样,用键入方式输入项目。 属性 因为组合框是文本框和列表框的组合,所以它的大多数属性都和这两个控 件相同。它有一个特殊属性Stye,用以确定组合框的形式c ≯ style:整型。这是组合框的一个重要属性,设置值可为o,1或2,决定组 合框的三种形式:即下拉式组合框,简单组合框和下拉式列表框

◆ 组合框（Combo Box）: 是一种同时具有文本框和列表框特性的控件。它可以像列表框一样，让用户 通过鼠标选择所需要的项目，也可以像文本框那样，用键入方式输入项目。  属性 因为组合框是文本框和列表框的组合，所以它的大多数属性都和这两个控 件相同。它有一个特殊属性Style，用以确定组合框的形式。 ➢ Style：整型。这是组合框的一个重要属性，设置值可为0，1或2，决定组 合框的三种形式：即下拉式组合框，简单组合框和下拉式列表框

滚动条 ◆滚动条( scrollbar 4兰 用来观察数据或确定位置,也可以来做数据的输入工具。 主要属性: Max:当滑块处于滚动条最大位置时所代表的值 Min:当滑块处于滚动条最小位置时所代表的值。 SmallChange当用户单击箭头时,滑块移动的增值量。 Large Change:当用户单击滚动条的空白处时,滑块移动的增值量 vaue:表示滚动条内滑块所处位置所代表的值 重要事件 ●scro滚动事件:在拖动滚动条上的滑块时触发。在单击滚动箭头时不发生。 ● Change改变事件:在滚动条内滑块的位置改变时发生

◆ 滚动条(scrollbar)： 用来观察数据或确定位置，也可以来做数据的输入工具。  主要属性： ⚫ Max:当滑块处于滚动条最大位置时所代表的值。 ⚫ Min:当滑块处于滚动条最小位置时所代表的值。 ⚫ SmallChange:当用户单击箭头时，滑块移动的增值量。 ⚫ LargeChange:当用户单击滚动条的空白处时，滑块移动的增值量。 ⚫ Value:表示滚动条内滑块所处位置所代表的值。  重要事件 ⚫ Scroll滚动事件:在拖动滚动条上的滑块时触发。在单击滚动箭头时不发生。 ⚫ Change改变事件:在滚动条内滑块的位置改变时发生

滚动条例题 建立一个水平滚动条( hscroll) 其max属性为1oo, min属性为o, smallchange属性为2, largechange属性为1o, value属性初始值为5o, 另有一个文本框(text它显示滑块当前位置所代表的值。 Sub hscroll changeo 滚动条 Text1.text=hscroll value End sub 速度

滚动条例题 建立一个水平滚动条(hscroll1)。 其max属性为100, min属性为0, smallchange属性为2, largechange属性为10, value属性初始值为50, 另有一个文本框(text1),它显示滑块当前位置所代表的值。 Sub hscroll1_change() Text1.text=hscroll1.value End sub

42时钟 时钟( (timer)): 可以有规律地隔一段时间触发一次Tmer(计时器)事件而执行相应的程序 代码。程序运行时,时钟控件并不显示在屏幕上时间显示在标签上。 *主要属性 nterval:时间间隔。表示两个计数器事件之间的时间间隔。单位为毫秒 (o.0015)。如 iNterval属性值为500,即每隔半秒产生一个计时器事件。 *事件 Timer:在一个时钟控件的预定的时间间隔过去之后发生。该间隔的频率储 存于该控件的 nterval属性中

4.2时钟 时钟（timer）： 可以有规律地隔一段时间触发一次Timer（计时器）事件而执行相应的程序 代码。程序运行时，时钟控件并不显示在屏幕上,时间显示在标签上。  主要属性 Interval：时间间隔。表示两个计数器事件之间的时间间隔。单位为毫秒 （0.001S)。 如Interval属性值为500，即每隔半秒产生一个计时器事件。  事件 Timer：在一个时钟控件的预定的时间间隔过去之后发生。该间隔的频率储 存于该控件的Interval 属性中

例题:在窗体上显示当前系统时间 a Form1 21:27:34

例题：在窗体上显示当前系统时间

建立对象:在窗体上建立一个时钟控件和一个标签控件。 设置属性:时钟控件 Interval:1ooo 标签控件 Borderstyle:1 编写代码 Private Sub tmrclock Timer labell Caption= Times“time$为日期函数,返回值为系统时间。 End Sub D工 四回 LAbel

建立对象：在窗体上建立一个时钟控件和一个标签控件。 设置属性：时钟控件 Interval:1000 标签控件 Borderstyle:1 编写代码： Private Sub tmrclock_Timer() label1.Caption = Time$ ‘time$为日期函数，返回值为系统时间。 End Sub

43菜单设计 ◆莱单概述 绝大多数应用程序都提供菜单。通过菜单对各种命令按功能进行分组, 使用户能够更加方便、直观地访问这些命令。又分为弹出菜单和下拉菜单。 莱单标题热键 菜单 文件的编想 文件(f)「编辑(e) 「打开o) trite 复制(c) Ctrl+c 莱单项 保存(s) Ctrl+s 快捷键 粘贴) Ctrl+V 退出(x) 分割线

4.3 菜单设计 绝大多数应用程序都提供菜单。通过菜单对各种命令按功能进行分组， 使用户能够更加方便、直观地访问这些命令。又分为弹出菜单和下拉菜单。 ◆ 菜单概述 菜单标题 热键 菜单项 分割线 快捷键