vb定时器.doc

课题：定时器循环教学要求：了解VB中的定时器，并会利用定时器实现循环结构。教学重点与难点：定时器的两个重要属性教学方法：教师操作演示，学生观察总结。任务驱动、启发式教学、边讲解边操作。教学过程：【新课导入】电脑的屏幕保护程序。运行桌面上的几个小例子后，大家有没有发现有一个共同的特征？【新课教学】VB的工具箱中有一个定时器控件可以帮助我们实现这种循环。定时器循环 PPT首先，在定时器对象中存放需要重复执行的程序，定时器工作时，每经过一定时间间隔就触发存放在定时器对象中的程序而形成循环。定时器的两个重要属性是“Enabled”和“Interval”。当“Enabled”的属性为“True”时，定时器开始工作；属性为“False”时，定时器停止工作。“Interval”属性决定了定时器对象中程序的时间间隔，它的取值范围为065535（单位：毫秒）。一、“倒计时”程序（1）程序功能运行“倒计时”程序。在文本框中输入开始倒计时的秒值，再单击“开始”按钮，开始倒计时。下面，我们就利用定时器来完成这个“倒计时”程序。（把教材翻到39页，图3.3-7，定时器的界面）（2）分析界面和原理程序界面上有哪些对象？有一个文本框（TextBox）用来输入要倒计时的秒数、一个标签（Label）显示单位，两个按钮（CommandButton）用来开始倒计时和结束整个程序。这个程序的主角是谁呢？定时器（Timer）（下面我们就要让这个主角上场了）（打开半成品）向窗体中添加一个定时器对象“Timer1”（在工具箱的哪里可以找到？忘记的话可以看书本39页）。先将定时器处于关闭状态，检查“Enabled”属性是否为False”。（还有一个属性是什么？时间间隔）将“Timer1”的“Interval”属性设置为“1000”（什么意思？）单击“开始”按钮，就将文本框中的值存入变量i，再将定时器对象“Timer1”的“Enabled”属性设置为“True”，定时器开始工作。定时器每隔1秒，就使变量i中的值减少1，可以用什么表达式来表示数字的逐一递减？（i=i-1）。也就是定时器每隔1秒，执行一次i=i-1。并将变量i中的值显示在文本框中，怎么表示？（Text1.Text = i）。当变量i中的值减到0时，将对象“Timer1”的“Enabled”属性设置为“False”，定时器停止工作。（2）程序源码Dim i As Integer 定义一个存放倒计时开始秒数的整型变量Private Sub Command1_Click() i = Text1.Text 将文本框对象中输入的秒值赋给变量i Timer1.Enabled = True 使定时器开始工作End SubRem 定时器对象中的程序段Private Sub Timer1_Timer() i = i - 1 秒数递减 Text1.Text = i 将递减后的数值显示在文本框中 （如果不打以下语句会怎样？用倒计时3秒演示）If i = 0 Then Timer1.Enabled = False 当秒值递减到0时，关闭定时器，结束循环。End SubPrivate Sub Command2_Click() EndEnd Sub学生练习：下发“倒计时半成品”，学生完成。PPT（倒计时程序的关键点）。程序做完了，大家对定时器有了一定的认识了吧。像这种每隔一段时间需要自动运行的并且重复执行的程序段，我们可以把它们放进定时器，让定时器来帮我们掌握时间、控制循环。下面我们再来另外一个例子。二、“动画”程序运行“动画”程序。思考以下问题：明明给了30张静止的图片，为什么单击“开始”按钮里面的人就会动起来呢？（每隔0.2秒切换一张图片，利用人眼的“视觉暂留”原理，形成连续的动态效果）谁来控制这0.2秒的时间间隔呢？（定时器）准备知识： Image1.Picture = LoadPicture(tiger.jpg) Image1.Picture = LoadPicture(x & .jpg) 将序号为x的图形送入Image对象Timer1中的循环体：x = x + 1 If x 30 Then x = 1 Image1.Picture = LoadPicture(x & .jpg)打开“动画”程序工程，分析界面和代码。其中Image1好像凹进去的，这种边缘样式在哪里设置？（教材翻到41页BorderStyle设置属性值为1）做好程序后，有些同学会发现提示“未找到1.jpg”,这是为什么？（必须把所有图片放在与工程的相同目录下）最后提醒大家，千万别忘记设置定时器的“Interval”属性（时间间隔）。好了，给大家30张图片你可以编写一个“动画”程序了，那如果我给你110张图片你也会利用定时器让动画动起来吗？需要在程序的哪里修改一下呢？“一周表情”exe文件。学生练习：下发“一周表情半成品”，参考教材P.40“动画”程序，完成“一周表情”程序。点评作业【小结】 本节课了解了VB中的定时器，并会利用定时器实现循环结构。在定时器对象中存放需要重复执行的程序，定时器工作时，每经过一定时间间隔就触发存放在定时器对象中的程序而形成循环。定时器的两个重要属性是“Enabled”和“Interval”。2