(
课件网) 第四节 逐帧动画 粤教版 八年级下 新知导入 观看这个动画，平常只要说到动画制作，我们就会想到flash；想一想，VB进行能不能进行制作动画呢？ 新知讲解 一、兔子跑的任务分析 观看图片：分析“兔子跑”程序设计思路。 从右至左，位置发生变化，跑的过程中，姿势也不断发生变化，当速度选项不同时，速度也不一样。 新知讲解 1、形态变化 兔子跑步时的形态最好是一组连续的分解动作图片。 让它们间隔一定的时间交替显示，并不断重复。 新知讲解 2、位置变化 形态变化的小兔子实现了“原地跑”的效果，要让它向左跑，可以每间隔一定的时间，让小兔子图片向左移动，即设置兔子图片left属性减少一定的数值。 新知讲解 3、速度变化 想加快兔子跑的速度，可通过增加步幅和加快频率两种方式来实现。增加步幅，就是让小兔子每个周期的移动距离加大，即left属性值减少得多一些；加快频率，就是在相同的周期内多跑几次，通过Timer控件来实现。 新知讲解 二、Timer控件和OptionButton控件 Timer控件的图标为： 1、Timer控件 作用：不断的每间隔一段时间响应一次Timer事件，即执行一组代码，直到被禁止为止；有Interval和Enabled. 新知讲解 Interval属性是以千分之一秒为单位指定Timer事情之间的间隔； 增加Timer控件图标———设置Interval属性值。 (1)、Interval属性 新知讲解 当Timer控件的enabled的属性值为True时，才触发Timer事件，否则停止或不启动Timer事件。其默认值为True。若需停止执行Timer事件，则将Enabled属性设置为False。 (2)、Enabled属性 新知讲解 实 践 参考下表，设置兔子奔跑程序的控件属性。 控件类型 属性 属性值 说明 Commandbutton 名称 cmdStart 开始按钮 Caption 开始 Timer Interval 500 时钟控件 名称 tmrRun OptionButton 名称 optSlow 慢速选项按钮 caption 慢速 新知讲解 OptionButton的控件图标是： 2、OptionButton控件 作用：显示一个可以打开或者关闭的选项，用OptionButton来显示选项，每个选项代表一种选择，用户只能选择其中一项。 例：设置三种不同的跑动速度。对应不同的事件。 新知讲解 三、分支结构 VB常见的分支结构是IF语句。 格式： If 条件 Then 语句组1 Else 语句组2 End If 条件 语句组1 语句组2 是 否 新知讲解 兔子形态变化的流程图 a=1 载入第1张图片 载入第2张图片 是 否 将a的值改为2 将a的值改为1 新知讲解 四、完善与调试程序 新知讲解 VB中常用的关系表达式和逻辑表达式 关系表达式：=（等于），>（大于），<(小于)，>=（大于等于），<=(小于等于)，<>（不等于）。 新知讲解 探 究 李鸣在运行程序时，出现下图错误，分析原因，应该如何修改？ IF 和 End If是配对出现的，出现错误是因为没有按照 IF 语句的格式来书写造成。 课后习题 1、Timer控件可用于后台进程中，要使Timer事件每半秒触发一次，则需设置Interval属性为（B）。 A. 50 B. 500 C. 5 D. 0.5 2、对于定时器（Timer）控件，设计其定时是否开启的属性是（C ）。 A．Index B．Tag C．Enabled D．Left 课后习题 3、在计时器控件中，interval属性的作用是（B）。 A．决定是否响应用户操作 B．设置计时器事件之间的间隔 C.存储程序所需要的附件数据 D.设置计时器顶端和其容器之间的距离 课堂总结 1、设置left属性的数值来改变位置。 2、Timer控件有Interval（指定Timer事情之间的间隔）和Enabled。 3、OptionButton来显示选项，每个选项代表一种选择，用户只能选择其中一项。 4、 分支程序If： If 条件 Then 语句组1 Else 语句组2 End If 板书设计 一、兔子跑的任务分析。 二、Timer控件和OptionButton控件。 三、分支结构。 四、完善与调试程序。 谢 ... ...
