第 十二 讲

基本课题：VB常用控件介绍（四）

教 学 目 的 与 要 求：

通过实例掌握复选框、图片框、图像框、计时器和滚动条的常用属性、方法和事件

教 学 的 重 点、难 点：

重点、难点：复选框、图片框、图像框、计时器和滚动条的常用属性

对 教 材 的 处 理 和 意 见：

以教材为主，联系实际情况及时做补充

八. 复选框（CheckBox）

1.常用属性：.value= 1 ‘表该项选中

0 ‘表未选中

2 ‘表禁止

2.事件：Click事件

3.使用

例12 (5-19)

九 图片框（PictureBox）

作用：为用户显示图片，也可作为其他控件的容器。

常用属性：

（1）Picture属性：设置被显示的图片文件名（包括可选的路径名）。在程序运行时使用LoadPicture()在图形框中装入图片。格式：

图形框对象.Picture=LoadPicture(“图形文件名”)

从图片框中删除一个图形，可用LoadPicture（）将一个空白图形装入图形框的Picture属性。

（2）AutoSize属性：True：图形框能自动调整大小与显示的图片匹配。

十图像框

与图形框的不同：图像框占用内存比图片框少，描绘的更快，且图像框内不能保存其他控件。

常用属性：

Stretch：值为False时，图像框可自动改变大小以适应其中的图形，值为True时，加载到图像框的图形可自动调整尺寸以适应图像框的大小。

十一. 计时器（Timer）

该控件可以每隔一个时间段就执行一次timer事件中的代码。

Timer 控件只有在程序设计过程中看得见，在程序运行时是看不见的。而且无论你绘制的矩形有多大，Timer 控件的大小都不会变。

1.Timer 控件的属性：

Timer 控件可以使用 Name 属性与 Enabled（True:定时器开始工作） 属性，但最重要的是 Interval 即时间间隔属性。

Interval 属性决定了时钟事件之间的间隔，以毫秒为单位，取值范围为 0 ～ 64767 ，因此其最大时间间隔不能超过 65 秒，即一分钟多一点的时间。如果把 Interval 属性设置为 1000 ，则表示每秒钟触发一个 Timer 事件。

其语法格式：

Timer.Interval = X ，其中，X 代表具体的时间间隔。

2.Timer 控件的 Timer （定时）事件：

当一个 Timer 控件经过预定的时间间隔，将激发计时器的 Timer 事件。使用 Timer 事件可以完成许多实用功能，如显示系统时间、制作动画，等等。

例13：计时器实例--用标签显示当前时间。（5-15）

1.创建程序界面：

为了便于观看，将 label1的边界类型设为1。把 Timer1 的 Interval 属性设置为 1000 。

2.在 Timer1 的 Timer 事件中输入以下代码：

Private Sub Timer1_Timer()

Label1.FontSize = 30

Label1.FontName = "宋体"

Label1.Caption = "当前时间为：" & Time
End Sub

注意，Time 是 Visual Basic 中的关键词，表示显示系统时间。

例14（5-16）

例15 倒计时

十二 滚动条

滚动条通常用来附在窗体上协助观察数据或确定位置，也可用来作为数据输入的工具。

l 滚动条控件为不能自动支持滚动的应用程序和控件提供了滚动功能。

l 滚动条有水平(HscrollBars)和垂直(VscrollBars)两种; HscrollBars左端最小右端最大，VscrollBars上端最小下端最大。

1 滚动条的属性

（1）min、 max属性：设置滚动条所代表的最大最小值。范围：-32768--32767默认min=0， max=32767

（2）value属性：返回或设置滚动条的当前位置

（3）LargeChange属性：设置单击滚动框和箭头之间的区域时， value属性值的改变量。默认1

（4）SmallChange属性：返回和设置单击滚动条箭头时， value属性值的改变量。默认1

2 滚动条的事件

lChange事件：每当滚动条的value属性值发生变化时，就发生Change事件。单击箭头，滚动框和箭头间的空白处或拖动滚动框动作结束时，滚动条的value属性值就发生变化。

l在滚动条内拖动滚动框的过程中，并不发生Change事件而是触发Scroll事件。

l实际编程中，常用Scroll事件过程来跟踪滚动条在拖动时数值的动态变化，用Change事件获得滚动条变化后的值。

3. 滚动条应用：

l提供简便的定位，作为输入设备，作为速度、数量的指示器。

例16(10-5)

在日常操作中，我们常常遇到这样的情况：在某些程序中，如 Photoshop ，一些具体的数值我们并不清楚，如调色板上的自定义色彩，这时，可以通过滚动条，用尝试的办法找到自己需要的具体数值。

例17(10-6)

例18 滚动条

十三 文件系统控件、形状、线形控件：后面讲

十四 OLE

十五 数据(Data)

（三）Active X控件