2016职教visual basic程序设计教案：5.6 时钟、滚动条、对话框等控件

《2016职教visual basic程序设计教案：5.6 时钟、滚动条、对话框等控件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、§5.6时钟、滚动条、对话框等控件VB中的控件比较多，在应用程序中常用的控件还有时钟、滚动条、对话框、进度条、Slider、UpDown、Animation等。【教学目标】使学习者能够掌握各种VB中常用控件的设计和编程方法。【教学要求】了解：自定义对话框的设计方法。理解：各种对话框的作用。掌握：利用Timer控件设计与时间有关的应用程序；熟练掌握通用对话框的设计方法。【本节重点】时钟控件的设计思想。通用对话框的种类、作用及定义方法。一、时钟（Timer）控件时钟（Timer）控件能有规律地以一定的时间间隔激发计时器事件（Ti

2、mer）而执行相应的程序代码。程序运行时，时钟控件不显示在屏幕上，若需要显示时可用一个标签控件来显示时间。1、属性时钟（Timer）控件中的最重要的属性是Interval（时间间隔）属性，该属性表示两个计时器事件之间的时间间隔，其值以ms（毫秒）为单位，介于0~64767ms之间。当Interval为0时，表示屏蔽计时器。若将Interval设置为1000，则每隔一秒钟引发一次计时器事件，从而执行相应的Timer事件过程。2、事件时钟只有一个Timer事件，利用该事件编程可以完成应用程序所需的定时动作。3、时钟控件应用举例制

3、作一个用时钟控件控制窗体内四张图片轮流播放的简单应用程序。窗体设计如下：在窗体中设计一个时钟控件和5个Image控件，其中Image1中不加载图片，另外4个Image控件中加载不同的图片。时钟控件的Interval属性值设置为1000，Image1控件的Visible属性设置为True，其他4个Image1控件的Visible属性设置为False。用时钟控件控制窗体内四张图片轮流播放的Timer事件程序如下：DimiAsIntegerPrivateSubTimer1_Timer()i=i+110SelectCaseiCase

4、1Image1.Picture=Image2.PictureCase2Image1.Picture=Image3.PictureCase3Image1.Picture=Image4.PictureCase4Image1.Picture=Image5.PictureEndSelectIfi=4Theni=0EndSub二、滚动条（ScrollBar）控件滚动条（ScrollBar）通常用来附在窗体上协助观察数据或确定位置。滚动条有水平和垂直两种。滚动条中有滑块，滑块用于鼠标拖放以变化数据或位置。水平滚动条的滑块在最左端代表最小

5、值，在最右端代表最大值。垂直滚动条的滑块在最上端代表最小值，在最下端代表最大值。滚动条的取值范围在–32768~32767。1、滚动条（ScrollBar）的常用属性（1）基本属性ScrollBar的基本属性有：名称、Height、Width、Top、Left、Enabled、Visible、Index等。（2）Max（最大值）属性Max属性表示当滑块处于滚动条最大位置时所代表的值。（3）Min（最小值）属性Min属性表示滑块处于滚动条最小位置时所代表的值。（4）SmallChange（最小变动值）属性SmallChange

6、属性表示鼠标单击滚动条两端箭头时，滑块移动的增量值。（5）LargeChange（最大变动值）属性LargeChange属性表示鼠标单击滚动条的空白处时，滑块移动的增量值（6）Value属性Value属性值表示滚动条内滑块所处的位置。2、滚动条（ScrollBar）的常用事件（1）Scroll事件拖动滑块时会触发滚动条的Scroll事件。（2）Change事件改变Value值属性时会触发滚动条的Change事件。（3）滚动条应用举例例如：在窗体中建立一个水平滚动条和一个文本框，令文本框中显示该滚动条Value值的变化。水平滚

7、动条的Max属性值设置为：100；Min属性值设置为：0；SmallChange属性值设置为：2；LargeChange属性值设置为：10；Value属性值设置为50。改变滚动条Value值属性时触发的Change事件程序如下：10PrivateSubScrollBar1_Change()Text1=ScrollBar1.ValueEndSub三、对话框对话框是用户与程序进行交互的重要途径，在对话框中既可以输入信息，又可以显示信息。VB中的对话框有三种：预定义对话框、通用对话框和用户自定义对话框。预定义对话框是系统定义的，就

8、是前面已经介绍过的InputBox和MsgBox，在此只介绍通用对话框和自定义对话框。1、通用对话框VB提供了一组基于Windows的标准对话框界面，用户可利用CommonDialog控件，建立和使用标准对话框。CommonDialog不是标准控件，将其添加到工具箱的方法是：选择“工程”菜