ⅤB 中Timer 控件教学方法研究

齐爱朋

（河南工业贸易职业学院，河南 郑州 451191）

教学方法的研究始终是教学研究的核心内容，启发式教学、讨论式教学、学生展示式教学、案例式教学等都能引导学生进行积极主动的思考，激发学生学习的热情。随着新技术的出现，课程教学有了很多新方法，如疫情期间的网络教学。新的技术、新的课程都在呼唤更适合、更有效的教学方法。本文就“Ⅴisual Basic 程序设计”这一门课程的教学为例，进行教学方法的探究。

Ⅴisual Basic 是Microsoft 公司开发的一种通用的基于对象的程序设计语言，是结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言[1]。ⅤB 拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，程序员可以轻松地使用ⅤB 提供的组件快速建立一个应用程序。

基于ⅤB 以上的特点，许多高校均把“Ⅴisual Basic程序设计”作为大学生的编程入门课。河南工业贸易职业学院是高职院校，学生入学成绩低、文化基础差、自主学习能力较低，笔者依据多年教学经验，总结出了上好ⅤB 课的方法，即：少理论、多实践；举例由浅入深，循序渐进；增加应用实例的趣味性。

下面以学习ⅤB 中Timer 控件为例，研讨如何吸引学生跟随教师的思路，快速掌握该控件的应用，并进一步熟悉ⅤB 程序的开发方法。

1 VB 程序设计方法浅析

ⅤB 程序设计一般包括界面设计和代码设计2个步骤。

界面设计：ⅤB 提供有工具箱，如图1 所示，包含丰富的控件，如文本框控件用于接收用户的输入、标签框可以显示信息、图像框可以在窗体上显示图片、命令按钮在运行时可以响应用户的单击事件等，方便用户设计界面。将这些控件添加到窗体上，并对相关的属性进行设置，就能设计出满足需要的各种界面了。设计程序时，只需依据功能，将相应的控件添加到窗体上，设置好格式及相应的属性，一个窗体应用程序的界面就设置好了。

图1 工具箱

代码编写：ⅤB 采用事件驱动的编程机制，即在程序运行时发生了某种事件才执行相应事件里的代码，所以ⅤB 的代码都是写在对象相应的事件过程中的。比如，程序运行时，若用户单击了某个命令按钮，程序就会执行该命令按扭的Click 事件代码。

所以学习ⅤB 控件，需要学习该控件具有哪些属性、其含义是什么、可响应什么事件及事件在什么情况下发生。

2 有趣的Timer 控件

在Windows 应用程序中常常要用到时间控制的功能，如在程序界面上显示当前时间，或者每隔多长时间重复执行一个事件等。Timer（时间）控件就是专门解决这方面问题的控件[2]。

Timer 控件的常用属性只有Interval 和Enabled2 个。

Interval（时间间隔）属性：用于设定计时器触发事件的时间间隔，单位为毫秒（ms），取值范围为0～65 535 ms。若将Interval 属性设置为0 或负数，则计时器停止工作。

Enabled（可用）属性：用于设置计时器是否有效。值为True（默认值），而且Interval 值大于0，计时器开始工作；值为False，计时器则停止工作。

Timer 控件唯一的事件就是Timer 事件。Timer 事件以Interval 属性指定的间隔时间发生，可将需要定时重复执行的操作放在该事件过程中完成。需要注意，当Enabled 属性值为True 且Interval 属性值大于0 时，计时器才能响应Timer 事件。

掌握了Timer 控件的属性及事件，就可以引导学生进行实例演练了。

3 循序渐进引入实例：新年快乐

为了让学生更好地掌握Timer 控件的应用，笔者采用了从单一功能到综合功能的方法，通过逐步引导学生实现：新年倒计时、闪烁的新年快乐、礼花绽放同时伴随鞭炮声，最后再综合到一起来实现一个动态的新年场景。

3.1 倒计时器

采用一个标签框显示数字，用一个Timer 控件控制按秒倒计时，实现从10 倒计时到0 停止。界面及实现代码如图2 所示。

图2 倒计时器

3.2 闪烁的文字

采用一个标签框显示文字，用一个Timer 控件控制文字的字号有规律地变大变小，字号在10～100 号之间变化。界面及实现代码如图3 所示。

图3 闪烁文字

3.3 礼花绽放

通过一个Timer 规律地在窗体上打印颜色随机、位置任意、大小不断变化的礼花。这里用随机函数Randomize 和Rnd 来产生随机数。界面及实现代码如图4 所示。

图4 礼花绽放

3.4 鞭炮声的实现

提前下载好礼花燃放的音效文件“1.mp3”，并存放在当前工程文件夹下。单击“工程”|“部件”，打开“部件”对话框，添加“Windows Media Player”控件到工具箱。往“礼花绽放”窗体添加媒体播放器对象WindowsMediaPlayer1，并在窗体的Load 事件中添加代码： WindowsMediaPlayer1.URL = App.Path +"1.mp3"。

在Timer 事件中添加代码：WindowsMediaPlayer1.Controls.play。重新运行程序，在礼花绽放的同时就会伴有礼花燃放的声音了。

3.5 功能融合[3]

通过以上几个单一功能的实现，学生已较好地掌握了Timer 控件。下面引导学生将上面3 个窗体功能合并到一个窗体上，实现新年倒计时结束后紧接着问候新年、礼花升起在效果。从而让学生进一步掌握多计时器的应用及如何在准确的时间点启动/停止计时器。

在同一个窗体上添加3 个计时器，其中Timer1 控制倒计时，Timer2 控制闪烁的文字，Timer3 控制礼花绽放及鞭炮声。再参考前面单一功能添加2 个标签框和1 个播放器，如图5 所示。

图5 新年到

修改窗体的Load 事件代码及Timer1 的Timer 事件代码，使得Timer1 先工作进行倒计时，计时结束后再启动Timer2 和Timer3 显示闪烁文字并燃放礼花。修改后的代码如图6 所示。

3.6 实现窗体大小可变化功能

程序运行期间，当用户调窗体大小时，文字将不能始终在窗体正中间，影响效果。由于当窗体大小发生变化时，将触发窗体的Resize 事件，所以在该事件中加入相应代码，当用户调整窗体大小时，让文字始终在窗体的中心位置显示而不会偏在一边。实现代码如图7 所示。

图6 修改后的代码

图7 Resize 事件代码

4 结语

最后再生成可执行的exe 文件，一个能独立运行的动态的新年场景就做好了。

Timer 控件是ⅤB 中唯一能实现动态效果的控件，通过该控件把学过的知识综合应用起来，可以增加程序的趣味性，从而提高学生学习的兴趣。这种理论知识加循序渐进创作实例的教学方法，简化了学习的难度，让基础不好的学生也能掌握，也给基础好的学生指出了进一步扩展更多功能的方法，能充分调动学生学习兴趣及学习积极性，起到事半功倍的效果。