VB 第5课 蝴蝶飞舞
第5课蝴蝶飞舞本课旨在带领学生制作通过Move方法用代码控制控件移动的动画程序，让学生认识控件的“方法”，了解控件的“方法”，进而初步形成“方法”的概念。
编写意图在VB6.0中，方法是一个非常重要的概念，对象有对象的方法，窗体有窗体的方法，控件有控件的方法，各方法使用方式相近，功能却又各不相同。
VB6.0作为一门高级编程语言，使用它来编写程序实际上更类似于堆积木，一个个控件就是一块块积木，堆积在一起的控件按照指定的方法最终实现需要的功能。
我们的目的，就是要让学生通过生动形象的编程实例，走近、理解“Move控件方法”，初步掌握“Move控件方法”以及Rnd、LoadPicture函数的使用方法。
内容分析课文中出示的“蝴蝶飞舞”动画程序共主要涉及到了：为Image控件指定其显示图像、控件数组、RND随机函数、控件属性在程序代码中的调用、Move方法、Timer计时器控件的简单应用以及Mod运算符七个知识点，本课侧重介绍Image控件的“Move方法”的应用。
教学目标1.知识与技能◆理解并掌握Move方法控件的概念及使用方法；◆理解Rnd、LoadPicture函数的使用方法；◆掌握为Image控件指定其显示图像的方法；◆初步了解控件数组、RND随机函数、控件属性在程序代码中的调用、Mod运算符以及Timer计时器控件的简单应用。
2.过程与方法◆通过学生自读教材与上机实验，使其能够基本读懂课文中出示的“蝴蝶飞舞”动画程序实例代码，并能使用自己的话进行解析；◆通过对“蝴蝶飞舞”动画程序实例的分析，结合他人的见解，归纳总结出控件的“方法”的基本定义。
3.情感态度与价值观◆在学生尝试自行解析程序代码的过程中培养其对陌生知识勇于探究，大胆尝试的精神和勇气；◆鼓励学生克服畏难情绪，勇于表达自己的见解并能够从中体会到成长的快乐。
教学重点◆理解并掌握Image控件的Move方法的概念及使用方法；◆初步理解控件的“方法”的含义。
教学难点◆用Image控件的Move方法按一定规律随机移动图像；◆控件数组和Mod运算符的使用。
实施建议1.课前准备建议蝴蝶开合翅膀时的两幅图片，为了使学生更容易使用，两幅图片的尺寸应该相同，且两幅图片中蝴蝶的中心位置应该可以重合；针对控件数组、RND随机函数、控件属性在程序代码中的调用、Mod运算符以及Timer计时器控件的简单应用这五个非主要知识点，准备好有代表性的，尽可能与他们在本课实例中的作用相关的实例程序。
2.教学方法建议前面可以采用任务驱动式教学法，由教师根据程序实例创设任务，通过简单演示，引领学生自行探究。
本课所选用的实例中涉及到的新知识点较多，因而除了需要较长时间开展分组讨论式教学法之外，其他诸如任务驱动、自主探究等教学法均可尝试。
在现阶段，初中四年级的学生已经得到过很好的逻辑思维锻炼。
对他们来说，在教师演示过后，结合教材和上机实验，不难自行总结并掌握一些较为简单的概念。
3.教学活动建议课文出示的“蝴蝶飞舞”动画程序代码中，用Image控件的Move方法按一定规律随机移动图像是本课的难点。
由于其中涉及到的逻辑关系较为复杂，不易理解，因此可以考虑设置这样一个教学活动，由学生按照实例代码，将变量数值带入代码中，得出蝴蝶每次扇动翅膀飞舞时的代码，并根据此代码分析得出：“蝴蝶飞舞”动画程序，实际上是由Image控件通过Mod运算符交替加载蝴蝶翅膀开合的两幅图片，同时，由Move方法将蝴蝶移动到按一定规律取随机数确定的坐标位置，蝴蝶翅膀开合图片的交替和蝴蝶位置的移动又都是由Timer计时器所控制的，至此，该难点即告突破。
参考资源方法，即对象的行为，此对象可以是控件，可以是窗体等等。
常见的方法还有Print 方法和Cls方法。
Print方法通常用于在窗体上输出信息。
其基本语法形式为：[对象.]Print[{Spc(n)|Tab(n)}][表达式列表][；|，]其中，[ ]中内容表示可省略，| 两边表示二者选一。
其余各项含义如下：对象：可以是窗体(Form)、图形框(PictureBox)或打印机(Printer)。
省略即指在窗体中输出。
Spc(n)函数：用于在输出时在两个输出项间插入n个空格，可多次重复使用。
Tab(n)函数：用于在输出时光标从对象左端开始向右移动n列，允许重复使用。
表达式列表：指要输出的数值或字符串表达式。
若省略，则表示输出一个空行，若输出多个表达式，则表达式间要用空格、逗号或分号分隔，也可出现Spc(n)函数和Tab(n)函数。
表达式列表起始打印位置是由对象的CurrentX和CurrentY属性决定，默认起始位置为打印对象的左上角。
；（分号）：表示光标定位上一个打印的字符后，（逗号）：表示光标定位在下一个打印区的起始位置处。
每个打印区之间相隔14列。
若既无分号“；”也无逗号“，”，则表示输出后光标换行。
注意：当窗体的AutoRedraw属性的值为False时，Print方法在Form_Load( )事件过程中无效。
Cls方法用于清除运行时窗体中显示的文本或图形。
其基本语法形式为为：[对象.]Cls其中，对象为窗体或图形框，省略则为窗体。
评价建议本节的课上内容较多，不适用于进行填表或交叉式评价。
由于本节涉及到的知识点大多非常陌生，学生往往在自主探究的环节，即便已经抓到了头绪，也会因对未知事物的恐惧而害怕进行表达，因而本节的课上评价建议教师采用分组积分类评价方式。
无论学生表达的内容是否正确，只要肯站出来将自己的探究成果和大家一起分享，就可以获得积分，推进自己所在的小组排名，以此来鼓励更多的同学参与进来，更好地完成本节教学目标。
为了培养学生经常进行自我反思的良好学习习惯，教师也可以制定一个较为长期的评价方式，例如下达《阶段自评表》。
学生阶段自评表这一个月来，我最大的收获是：；不足之处是：；我的：；教学案例第5课蝴蝶飞舞教学设计教学目标1.知识与技能◆理解并掌握Image控件的Move方法的概念及使用方法；◆理解控件的“方法”的含义；◆掌握为Image控件指定其显示图像的方法；◆初步了解控件数组、RND随机函数、控件属性在程序代码中的调用、Mod运算符以及Timer计时器控件的简单应用。
2.过程与方法◆通过学生自读教材与上机实验，使其能够基本读懂课文中出示的“蝴蝶飞舞”动画程序实例代码，并能使用自己的话进行解析；◆通过对“蝴蝶飞舞”动画程序实例的分析，结合他人的见解，归纳总结出控件的“方法”的基本定义。
3.情感态度与价值观◆在学生尝试自行解析程序代码的过程中培养其对陌生知识勇于探究，大胆尝试的精神和勇气；◆鼓励学生克服畏难情绪，在勇于表达自己的见解并能从中体会到成长的快乐。
教材分析：当我刚开始进行程序设计的教学时，便感觉比较难教。
这是因为程序设计本身枯燥、严谨，较难理解，而且学生大多数都是初学者，没有相应的知识基础。
总结设计VB6.0程序的一般步骤：创建用户界面；设置控件属性；编写事件程序代码；运行应用程序。
学情分析：从发展性教学评价的理念出发，采用以学生为主体，教师为主导的教学模式，以建构主义现代教学思想和任务驱动式教学方法为指导开展教学活动。
针对学生信息素养参差不齐的现状，以活动训练为主线，让学生在实践操练中掌握利用VB编制程序的基本方法。
教学重点：运用开发VB6.0程序一般过程的思路来制作“蝴蝶飞舞”动画应用程序。
教学难点：分析得出实现“蝴蝶飞舞”各运算功能的算法。
教学方法：结合任务驱动法、自主探究学习模式，引导学生完成相应的任务教学资源：多媒体教室，搜索的关于VB6.0动画制作的相关资料文件教学过程：一、明确任务，引入新课学生活动：欣赏完成后的“蝴蝶飞舞”动画，并看教材，明确本节课学习任务教师活动：广播形式演示完成后程序的效果，分析任务，明确任务。
设计意图：明确本节课学习任务，演示效果增加学习的趣味性。
二、布置操作任务，学生自主完成学生活动：按照书上提示完成的制作“蝴蝶飞舞”动画应用程序，尝试完成操作任务。
学生间互相交流，遇到难处可以向教师请教。
教师活动：在操作过程中，教师巡视、检查学生对上节课内容的掌握情况。
当大多数学生完成操作任务后，教师就操作中存在的共性问题，进行集中辅导。
设计意图：让学生熟练掌握VB6.0界面设计的方法三、提交作业，学习小结，集中解决难点教师针对巡视中发现的问题，集中辅导。
讲解程序代码控制控件移动以及程序中控件的“方法”要求学生将自己的作品发布成EXE文件存盘，提交自己的作品。
教学评价：注重学生对所学知识的意义建构，重视学习过程和学习体验的评价。
鼓励学生多尝试、多实践，在操作中体验和掌握VB6.0开发程序的一般过程。
结合学生的操作，总结本课学习内容。
四、应用拓展，巩固提高学生活动：思考并分别尝试解决教材中“各显神通”“博弈舞台”中的问题，研究讨论问题解决方案教师活动：师生共同尝试研究解决问题，提供教师的参考意见各显神通在前面编写的“蝴蝶飞舞”动画程序中，我们将计时器控件的Interval属性设置为了200，谁能说说如果设置为其他的数值会不会有什么不同呢？如果我们不将蝴蝶翅膀开合的两幅图片重合放置会怎样呢？当我们按下“开始飞行”按钮时，蝴蝶开始向右上角飞舞，我们要怎样做才能让蝴蝶向右下角飞舞呢？蝴蝶飞舞的时间久了，我们想让它停下来，有什么办法可以让飞舞中的蝴蝶停下来么？五、课后作业课后自学“资源视窗”中内容；有条件的同学参考“成长基石”，建立自己的博客，记录学习经验和体会。
教学反思：（略）。
第二册信息技术《飞舞蝴蝶》教学设计
第二册信息技术《飞舞蝴蝶》教学设计第二册信息技术《飞舞蝴蝶》教学设计作为一位无私奉献的人民教师，通常需要用到教学设计来辅助教学，教学设计要遵循教学过程的基本规律，选择教学目标，以解决教什么的问题。
那要怎么写好教学设计呢？以下是店铺为大家收集的第二册信息技术《飞舞蝴蝶》教学设计，欢迎大家分享。
教材分析《飞舞的蝴蝶》是小学信息技术教材第二册第三单元第十四课的内容，教学对象是小学四年级的学生。
这一课主要是让学生掌握在幻灯片中的图片能够按照自己的设置的路径进行自由的飞翔。
让，飞舞的蝴蝶为春天带来无限的生机，感受春天的美丽。
学情分析四年级的学生对演示文稿中的幻灯片在知识上已有一定的认识，对于新生事物有很强的求知欲，而演示文稿软件带领学生走进一个神奇的世界。
培养学生对电脑的兴趣，了解现代信息技术，从而掌握电脑的一些基础知识和操作方法。
掌握好为幻灯片中的动感图片设置路径的操作方法，为我们的学习作品增添了无限的动感，从而使学生感受会飞翔的蝴蝶为春天带来的无限的生机，感觉到春天的美丽，增加学生的学习兴趣。
在制作的过程中培养了学生创造力和思维想象力。
设计这一个课时，我不仅希望学生学会对幻灯片中的动感图片设置路径的操作，更希望他们用自己掌握的电脑操作充分发挥自己的想象力，给生活创造美。
教学目标知识目标：学会为幻灯片中蝴蝶图片设置动作路径的操作方法。
并能为多个蝴蝶设置动作路径，让它们同时飞舞。
能力目标：通过小组合作的学习培养学生自我探索、自主学习的能力和自我创新、团体协作的能力。
情感目标：让学生自我展示、自我激励，体验成功，在不断探索中激发求知欲，在不断摸索中陶冶情操。
创新目标：学生能够不拘泥于教师提供的素材，在制作过程中加入自己的想法、创意，创作出有自己风格中的作品。
教法学法采用激趣式导入及演示的教学方法，学生以合作探索学习，相互评价等方法进行学习和应用所学知识。
重点难点重点：在探索学习中，掌握对幻灯片中的对象设置动作路径的操作方法。
蝴蝶飞舞反思
《蝴蝶飞舞》微反思
本节课是在学生掌握传统补间动画制作的基础上进行的新内容教学，引导层动画是Flash动画制作课程中四类基本动画之一，它的内容虽然称不上是最难的，但也属于技巧性比较强的。
因为它必须建立在元件、动作补间动画的基础之上，也就是说学生必须是具备一定的FLASH操作基础，因此本课内容对学生的要求较高。
相对而言引导层动画的含义，定义以及组成要素，是较易理解的。
鉴于此，我决定本课就从引导层动画制作下手，在学生掌握制作的基础之上，用总结理论，完成引导层动画制作的学习。
整个导入的部分，我采用动画《蝴蝶飞舞》来激发学生的学习兴趣，并且穿插设问法，让学生一边欣赏动画，一边分析蝴蝶飞行的轨迹。
在学生讨论的基础上，我再引导他们总结出蝴蝶飞行的路线都是预先设定好的一些不规则的轨迹，这些轨迹便是由引导层动画制作完成的，从而得出引导层动画的作用是根据自身的形状来限制元件的移动轨迹。
然后通过讲授法、演示法来具体讲解引导层动画的详细制作过程以及应该注意的细节问题。
由于信息技术课程的自身特点，导致了班级内学生之间的层次异常明显。
所以在任务设计上我也采用了分层处理：把基础任务作为授课的重点，认真详细得加以讲解演示，以保证每个学生都能完成本节课教学目标；对于那些程度教好的学生我同时准备了一个提高任务，让他们自己去探索去尝试。
通过这种能力迁移训练实现提高学生的自学能力和创新能力的目的，真正做到“得法于课内，得益于课外”。
蝴蝶飞舞
作品欣赏与评 价
总结与作业
板书设计
课后反思及小 结
本微课应用情况达到了预期的效果，本学期，我将本微 课应用到了八年级 2 班，要求学生提前将课本预习，没有 要求学生课前提前观看微课视频，而是在课堂上观看，教 师课前利用电子教室将微视频发到每台学生机上，与以前 的教师边演示边讲解，学生边练习做对比，具有以下优势： 以前是将教学任务分成几个部分，每一部分安排一定的时 间，教师先分析，演示后学生再练习，教师巡视指导，完 成较快的学生帮助其它较慢的学生。不管完成的多快，都 要等这部分结束，再进行下一部分，一节课下来，有时候 刚完成教学任务，有时候还要等下节课继续。这节课是让 学生自己观看视频，边看边练习，不会的可以重复回看， 已经会的可以快进观看，由于视频讲解详细，学生很快就 能学会，很大一部分学生还可以进行创新制作。这样在课 堂上以观看微视频的方法，既解决了我的学生由于上网困 难，无法在课下提前观看学习的问题，也真正实现了翻转 课堂，真正做到了以每位学生为中心。体现了因材施教的 教学原则。
【第 9 课】
蝴蝶飞舞
----“引导层”动画
清华版 所属年级 八年级 学科 信息技术 姓名 上册 1. 巩固“影片剪辑元件”的制作与应用。 知识目标 2. 学习引导层动画的制作方法。 教 学 目 能力培养 标 思想教育 单位
1,培养学生自主学习及合作学习的能力 2,激发学生的创新性,能创作出有个性的程序 3,培养学生欣赏他人作品以及评价他人作品的能力 大胆想象,勇于创作
学生活动
任务导航
图 9.1
2.本课任务 我们通过制作蝴蝶在画面中飞舞的效品和最佳创新作品。 A:教师课前将制作好的《引导层动画的制作》微视频，利 用电子教室发到每个学生机上。 B：教师课前利用 1 分钟了解学生提前预习课本情况，并简 单统计。 C:教师引导，引入新课标题。 1， 播放第 8 课动画实例“荷兰风车.fla” 2， 师问：如果在“荷兰风车.fla”动画的花丛中再加上 以学生 几只蝴蝶沿着不同的路径在飞舞，是不是更美呢？ 自主学习 3， 接着播放教师提前制作好的“蝴蝶飞舞.fla” 为主 4， 师问：如何能让蝴蝶沿着不同路径自由飞舞呢？ 5， 引出课题 D:学生自主打开桌面微课视频，进行观看学习，边观看边 操作，已经会的学生可快进观看，程度较弱的学生装可以 重复观看。教师指导。 E:教师对有疑问学生进行个别辅导。也可以同桌间一起观 看，一起讨论学习。
VB教案课程(全套)
课题第1课vb开发环境简介教学目标1、知识目标：●了解程序设计的一些术语●熟悉vb开发环境●掌握启动与退出vb的方法2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。
授课课时4个课时教学方法任务驱动法、演示操作法教学重点认识vb开发环境教学难点Vb界面中各部分的功能教学过程一、导入新课（提问法）1、教师提出疑问：如何打开并关闭vb程序，从而导入课题？软件开发是一门新兴的朝阳产业，而期中程序设计就是它的最基础部分，这学期我们通过学习vb来掌握程序开发。
二、讲授新课（讲授演示法）1、启动与退出vb1.1启动vb：桌面上双击快捷图标，执行“开始——程序——microsoftVisualbasic6.0中文版”命令。
教师讲解，有以下四种启动方式。
方法1.使用“开始”菜单的“程序”命令；方法2.使用“我的电脑”图标，找到“vb6.exe”并双击它；方法3.使用“开始”菜单的“运行”命令；方法4.利用快捷方式。
1.2退出vb：执行“文件——退出”命令，点击标题栏的关闭按钮2、认识vb工作环境Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。
教师讲解，有以下两种退出方式。
1.“文件”菜单－>“退出”2.Alt＋Q系统将提示是否存盘，根据需要回答“Y”/“N”3、设置vb工作环境用户可以根据自己需要对vb程序进行相关设置，执行“视图”菜单中的命令，可以打开或关闭相应的窗口。
4、运行示例程序演示“泡沫”、“飞舞的蝴蝶”、“计算器”。
注重VB教学方法提高程序设计能力
【 关键词】 Ｂ 实例 演示 案例 分析 实验驱动 项 目设 计 ：Ｖ
Ｖ Ｂ是 五年 高 职计 算 机 专 业 学 生 的 重要 基 础 课 程 之 一 ． ～ 替 变 化 实现 的 。 直 观 看 到 具体 分 析 ． 生 们 程序 设 计 思 路 清 楚 是 从 学 门集 知 识 和技 能 于一 体 、 逻辑 分 析 和 实 践 操 作都 很 强 的课 程 。 相 了 ． 就 理 解 了 什 么 是程 序 设 计 。 也 当 ～ 部 分 学 生对 Ｖ 课 的 学 习 还 停 留在 只 动 手 不 动 脑 的 阶 段 ． Ｂ 实 践 证 明 ． 择 能 激 发 学 生 兴 趣 的实 例 ， 过 启 发 、 选 通 引导 的 往 往是 ” 一看 就 会 ． 做 就 傻 眼 ” 在 课 堂 上还 没有 及时 跟 上 老 师 教学 方 法 能 充 分 地 调 动 学 生学 习 的积 极 性 和 主 动 性 ．也 让学 生 一 ． 的思维。如果 Ｖ Ｂ的 教 学 ． 只注 重 基础 知 识 的学 习 ． 忽 略 编 程 掌握 了程 序 设 计 的思 想 和方 法 而
能 力 的 培养 ． 必影 响 学 生 的就 业 竞 争 力 ． 生 对 Ｖ 势 学 Ｂ的 学 习 仅 ３ 实验 驱 动 ． 高编 程 能 力 、 提 限 于应 付等 级 考 试 ， 失 去 对 Ｖ 而 Ｂ程 序 设 计 的更 高 追 求 。 因此 ． 实 验是 检 验 知 识 ． 合 运 用 知 识 的重 要 教 学 手 段 ． 培养 学 综 是 Ｖ Ｂ程 序 设计 教 学 应 以 培 养学 生 实 际 应 用 能 力 为 中 心 ． 以提 高 学 生 解决 问题 能 力 和创 新能 力 的必 要 环 节 。 Ｂ是一 门实 践 性很 强 Ｖ 生 综 合 素 质 为前 提 ． 过 改 进 教 学 方 法 ， 整 教 学 手 段 ． 高 教 的课 程 ， 生 只 听不 练 根 本 达 不到 学 习 该 课 程 的 目的 。 有通 过 通 调 提 学 只 学 质量 ． 到 学 以致 用 的 目的 。 达 具 体 的实 践 ． 生 才 能 体 会 和 掌握 其 中的 奥 妙 所 以实 验 环节 非 学 １ 例 演 示 ． 发学 习兴 趣 ． 实 激 常重 要 。在 开始 阶段 ． 先 让学 生 模 仿 几 个 实 验 ， 师可 先 快 速 首 教 学习Ｖ Ｂ课程 ． 兴趣 是 最 好 的 老 师 教 师 应 根据 特 定 的 教学 介 绍 实 验 的设 计 要 求 并 对 实 验 完 成 的 过 程 进行 演示 ．然 后 让 学 内容 ． 计 有 趣 味 性 和 实 用 性 的 教 学 实 例 ． 发学 生 的好 奇 心 和 生逐 渐 过 渡 到 独 立完 成 实 验 环 节 采用 任务 驱 动 教学 法 ． 设 激 每节 实 求 知 欲 。 持 学 生 的学 习 兴 趣 和信 心 。 选 实 例都 应 经 过 深 思熟 验 课 都 要求 学 生 完成 几 个 具 体 的 任 务 ．且 实验 前让 学 生 做 到 预 保 所 虑 ， 真 思 考 ． 一 个 实例 应将 知 识 点 都 穿 插 起 来 ， 且 为 后 续 习 ． 求 学 生 将 预 习 的 程 序写 在 作 业 本 上 ， 认 每 并 要 调试 时用 红 笔 直 接 修 知 识 点 的学 习埋 下 伏 笔 ．这 些 实 例 经 过 教 师 的 讲 解 就 可 以 激 发 改 在 作 业 本 上 ．这 样 既 便 于 学 生 学 习 更 有 针对 性 ．学 生 有 紧 迫 学 生 的 学 习兴 趣 。 感， 同时 也 提 高 了学 生 发现 问题 ． 解决 问 题 的综 合能 力 。 如何上好” 导学 篇 ” 非 常重 要 的 在 上 课 的 时 候 ． 师 首先 是 教 另 外 ， 励 学 生 进 行创 造性 练 习 ， 过 表扬 、 末 加 分 等 手 鼓 通 期 演 示 一 个用 Ｖ Ｂ语 言 编写 好 的 ． 涵盖 Ｖ Ｂ本 门 课 程所 有实 验 的实 段 激励 学生 通 过 在 大 量 的 编 程 练 习 中 提 高 编程 能 力 为 学 生 发 验 演示 系统 ． 系统 中所 有 实验 通 过 菜 单 方 式 进行 调 用 。 先 为该 挥 想 象 力 和创 新 提 供 了平 台 。 师 在 实 验 过程 中要 加 强 指 导 ， 首 教 注 系 统设 计一 个 ” 迎使 用 Ｖ 欢 Ｂ实 验 演 示 系统 ” 的界 面 ． 中包 含 图 意 总 结 ． 学 生 经 常 出现 的 问题 进 行 汇 总 ， 及 时 给 学 生 讲 解 ． 其 将 并 片 ． 画 、 音 ． 时 设 置 了密 码 ． 求 密 码 输 入 ３次 ． 对 则 结 避 免 同样 的错 误 在 学 生 中反 复 出现 。 动 声 同 要 不 束 应用 程 序 ， 确 则 进入 实验 系 统 。 过 演示 、 解该 实 验 系统 。 ４ 项 目设 计 ． 养 程序 开 发 能 力 正 通 讲 、 培 通过学 习 、 验 ， 生大致掌握 了 Ｖ 实 学 Ｂ的 一 些 基 本 知 识 ， 但 学 生对 本 门课 程 的 内容 首 先 有 了 一 个 感 性 认 识 ．然后 告 诉 学 生 缺 对 注 意 自己平 时 实验 的积 累 ．告诉 学 生 当学 完本 门课 程 后 自 己也 对 知识 的理 解 只 停 留 在 表 面 上 ． 乏 系 统 的运 用 ． 小 型 应 用 程 可 以将 这 个 实 验 系统 组 装 起 来 ．还 可 以 在 此 基 础上 创 新 出更 好 序 系 统 的 开 发 步 骤 和 调试 都 还 不很 熟 悉 为使 学 生 掌 握 Ｖ Ｂ编 的 项 目。 生 听 了 ， 学 兴趣 倍 增 ， 产生 了强 烈 的 好 奇 心 ． 维也 活 跃 程 、 向对 象 程 序 设 计 思 想 的知 识 实 际 技 能 ． 握 应 用 Ｖ 思 面 掌 Ｂ编 写 起 来了． 开始 思 考 怎 么样 用 计 算 机 去 实 现 这 些 功 能 ． 渴 望 马 上 程 序 方 法 ． 养 学 生 初 步 的项 目设 计 能 力 ． 完 成一 个 大 的编 程 并 培 应 去 学 习掌 握 这些 技 能 项 目 ， 要 求 与 课 程 单 元 的项 目差 不 多 。 其 只是 综 合 性 更 强 、 度 难 ２案 例 分 析 。 会 程序 设 计 思 想 ． 领 更 大 、 识覆 盖 面 更 广 ， 作 量 更 大 ． 全 面 促 进 学 生 复 习和 梳 知 工 以 在 看 了演 示 实 例后 ．学 生 普 遍 对 程序 设 计 产 生 了浓 厚 的 兴 理学 科 教 学 内容 ． 升 学 生 分 析 问 题 、 决 问题 和 文 档 的 书写 和 提 解 趣 ， 渴 望进 一 步 学 习 。接 下 来 ， 师再 分 析程 序 的思 路 、 构 ， 编 制 例 如 可 以 要求 学 生模 仿 设 计 ｗｎ ｏ ｓ附 件 中 的计 算 器 或 并 教 结 ｉｄｗ 让 学 生 从 实 例透 彻 理 解 到底 什 么是 程 序 设 计 ． 以及 设 计 程 序 的 写字 板 ； 于部 分数 据 库 基 础 掌握 得 较 好 的 同学 ， 求他 们编 写 对 要 主要 步 骤 。由 于 Ｖ Ｂ所 涉 及 的概 念 、 名词 及 程 序 设 计 思想 都 比较 网 上学 生 成 绩 查 询 系 统 或 图 书馆 管 理 系统 ．这 些 课 题 都 比较 贴 复杂 。 多知 识 点本 身就 具 有 较 强 的概 念 性 和 逻 辑性 。 因此 ． 很 单 近 学 生 的 实 际 ， 生 也 很 有 兴 趣 ， 此 他 们 在 设 计 时较 为 投 入 ， 学 因 纯 的理 论 讲 解 其 效果 是 不 行 的 。所 以 ． 例 的 分 析 是一 个 十 分 也 能认 真 地 查 阅 资 料 ． 析 步 骤 ． 行 控 件 的 选 取 、 性 的设 置 案 分 进 属 重 要 的 教学 环节 ． 过 经 典 趣 味 的 案 例 分 析ｆ Ｉ 波 那 契 兔 子 和事 件 的编 写 、 通 如Ｉ Ｉ 菲 调试 。这 样 可 以 大 大 提 高学 生 的程 序 开 发 能 力 ， 问 题 ”，水 仙 花 ”， 赛 积 分 ” ）让 学 生 循 序 渐 进 的掌 握 相 关 增 强 了学 生 的 团 队 精 神 ． 到 了较 好 的 效 果 。 教学 过 程 实施 的 ” ” 竞 等 。 收 在 的理 论 知识 及 概 念 ． 点 让学 生 领 会 程 序设 计 的思 想 和 方 法 ． 重 同 开始 ． 给几 个 类 似核 心 实 例 的 项 目设 计 内容 ， 学 生 选择 。对 核 供 时 经 典 趣 味 的案 例 可 以 培养 学 生 的学 习兴 趣 ．让 学 生 主 动 参 与 心 实例 的调 试 比较 成 功 的 ．可 以 同步 实 施 自己 所 选 的 项 目设 计 达到培养学生分析问题和解决问题的能力。 对掌握核心实 教学活动。 可将案例内容分为若干个主题 ， 以程序设计作为贯穿 内容 ． 例有 困难 的 学 生 ． 对 教 学 内 容重 新 布 置 实 验 ． 化 知识 巩 固 。 针 强 各 主 题 的 主线 例 如首 先 演 示 一 个 书 上 有 的” 蝶 飞 舞 ” 例 ． 后 通 过 改 蝴 实 然 为 了保 证 项 目设 计 能 够 按 照 预定 的 目标 和 计 划 进 行 ．教 师 变 实 例 中相 关 代 码 ． 蝴 蝶 飞 舞 的 速 度放 慢 ， 学 生 理 解 计 算 机 还 应 采 取 以下 措 施来 。 强对 学 生监 督 和 管 理 。 让 让 加 如 何 控 制蝴 蝶 的 飞 舞 。 蝴蝶 飞 舞 的动 作 看 似 复 杂 。 实 简 单 ， 其 该 １首 先 讲 清 楚 项 目设 计 的 意义 ． 学 生 能 够 自觉 积 极 主 动 ．２ １ 第 ２期 ０ ０年
VB编程案例(蝴蝶飞舞,计算器,加密,解密,矩阵转置,鸟巢,统计,文本编辑,小球跳动,学生信息录入窗口)
目录一、鸟巢绘制 (2)二、加密 (3)三、解密 (4)四、蝴蝶飞舞 (6)五、文本编辑 (6)六、统计 (9)七、小球跳动 (11)八、计算器（彩票摇奖） (12)九、学生信息录入 (16)十、矩阵转置 (17)一、鸟巢绘制Private Sub Form_Click()ClsDim r, xi, yi, xj, yj, x0, y0, aif As Singler = Form10.ScaleHeight / 2x0 = Form10.ScaleWidth / 2y0 = Form10.ScaleHeight / 2n = 16aif = 3.14159 * 2 / nFor i = 1 To nxi = r * Cos(i * aif) + x0yi = r * Sin(i * aif) + y0For j = i To nxj = r * Cos(j * aif) + x0yj = r * Sin(j * aif) + y0Line (xi, yi)-(xj, yj), QBColor(i - 1)PSet (xi, yi)Print i - 1Next jNext iEnd SubPrivate Sub Form_Load()Print "要求：";Print "1.将圆周等分成16份；"Print "2.每个等分点要标记成0-16的数字；" Print "3.按样本图的图案画图。
"End Sub附图：二、加密Function code(ByVal s$, ByVal key%) Dim c As String * 1, iAsc%code = ""For i = 1 To Len(s)c = Mid$(s, i, 1)Select Case cCase "A" To "Z"iAsc = Asc(c) + keyIf iAsc > Asc("Z") Then iAsc = iAsc - 26 code = code + Chr(iAsc)Case "a" To "z"iAsc = Asc(c) + keyIf iAsc > Asc("z") Then iAsc = iAsc - 26 code = code + Chr(iAsc)Case Elsecode = code + cEnd SelectNext iEnd FunctionPrivate Sub close_Click()Form11.HideForm1.ShowEnd SubPrivate Sub Jiami_Click()Text2 = code(Text1, 2)End SubPrivate Sub open_Click()CommonDialog1.Action = 1Text1.Text = ""Open CommonDialog1.FileName For Input As #1Dim counter As IntegerDim workarea(25000) As StringProgressBar1.min = LBound(workarea)ProgressBar1.max = UBound(workarea)ProgressBar1.Visible = TrueProgressBar1.Value = ProgressBar1.minFor counter = LBound(workarea) To UBound(workarea) workarea(counter) = "initial value " & counter ProgressBar1.Value = counterNext counterDo While Not EOF(1)Line Input #1, inputdataText1.Text = Text1.Text + inputdata + vbCrLfLoopClose #1End SubPrivate Sub save_Click()CommonDialog1.FileName = "a1.txt"CommonDialog1.DefaultExt = "txt"CommonDialog1.Action = 2Open CommonDialog1.FileName For Output As #1Print #1, Text2.TextClose #1End Sub三、解密Function UnCode(ByVal s$, ByVal key%)Dim c As String * 1, iAsc%UnCode = ""For i = 1 To Len(s)c = Mid$(s, i, 1)Select Case cCase "A" To "Z"iAsc = Asc("c") - keyIf iAsc < Asc("A") Then iAsc = iAsc + 26UnCode = UnCode + Chr(iAsc)Case "a" To "z"iAsc = Asc(c) - keyIf iAsc < Asc("a") Then iAsc = iAsc + 26UnCode = UnCode + Chr(iAsc)Case ElseUnCode = UnCode + cEnd SelectNext iEnd FunctionPrivate Sub close_Click()Form2.HideForm1.ShowEnd SubPrivate Sub Jiemi_Click()Text2 = UnCode(Text1, 2)End SubPrivate Sub open_Click()CommonDialog1.Action = 1Text1.Text = ""Open CommonDialog1.FileName For Input As #1Dim counter As IntegerDim workarea(25000) As StringProgressBar1.min = LBound(workarea) ProgressBar1.max = UBound(workarea) ProgressBar1.Visible = TrueProgressBar1.Value = ProgressBar1.minFor counter = LBound(workarea) To UBound(workarea) workarea(counter) = "initial value " & counter ProgressBar1.Value = counterNext counterDo While Not EOF(1)Line Input #1, inputdataText1.Text = Text1.Text + inputdata + vbCrLfLoopClose #1End SubPrivate Sub save_Click()CommonDialog1.FileName = "a.txt" CommonDialog1.DefaultExt = "txt" CommonDialog1.Action = 2Open CommonDialog1.FileName For Output As #1 Print #1, Text2.TextClose #1End Sub四、蝴蝶飞舞Private Sub Form_Load()Print "蝴蝶飞出窗体后重新定位到左下方再向右上方飞" End SubPrivate Sub Timer1_Timer()Static PickBmp As IntegerIf PickBmp = 0 ThenImage1.Picture = Image2.PicturePickBmp = 1ElseImage1.Picture = Image3.PicturePickBmp = 0End IfCall mymoveEnd SubSub mymove()Image1.Move Image1.Left + 40, Image1.Top - 25If Image1.Top <= 0 ThenImage1.Left = 0Image1.Top = 2325End IfEnd Sub图：五、文本编辑Private Sub Copy_Click()Clipboard.ClearClipboard.SetText RichTextBox1.SelTextEnd SubPrivate Sub Cut_Click()Clipboard.ClearClipboard.SetText RichTextBox1.SelTextRichTextBox1.SelText = ""End SubPrivate Sub Exit_Click()Form3.HideForm1.ShowEnd SubPrivate Sub Font_Click()CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects CommonDialog1.Action = 4RichTextBox1.FontName = CommonDialog1.FontName RichTextBox1.FontSize = CommonDialog1.FontSize RichTextBox1.FontBold = CommonDialog1.FontBold RichTextBox1.FontItalic = CommonDialog1.FontItalic RichTextBox1.FontStrikethru = CommonDialog1.FontStrikethru RichTextBox1.FontUnderline = CommonDialog1.FontUnderline RichTextBox1.ForeColor = CommonDialog1.ColorEnd SubPrivate Sub Form_Load()Print "注："Print "1.'打开'对话框的初始文件夹应是所要打开文件所在的" Print "文件夹，将提供的xz.txt文件打开；"Print "2.要实现将选定的内容格式化，必须在工具箱中添加" Print "RichTextBox控件（Microsoft Rich Textbox Comtrol 6.0）" Print "并在帮助菜单中查阅其字体设置的相关属性。
引导线动画——蝴蝶飞舞
邯
课题：蝴蝶飞舞—引导线动画 课型：新授课
【学习目标】
1、理解运动引导层的作用
2、会添加引导层、绘制引导线
3、会制作引导线动画
【学习重点、学习难点】
会添加引导层、会制作引导线动画
【学习过程】
一、制作蝴蝶飞舞的补间动画
形状补间与动画补间的区别：动画补间中的运动对象必须是 。
二、基础任务：制作一只蝴蝶的飞舞的引导线动画
知识点：
1、由图中画圈的图层叫 ，并会添加。
2、引导层中要画引导线，可用铅笔绘制，注
意 。
3、因为蝴蝶是元件，所以要做 补间。
4、蝴蝶图层中，前后两个关键帧的蝴蝶一定要吸附在引导线的两个端点上，拖动时要用“选择工具”把鼠标指向蝴蝶元件的 。
三、两只蝴蝶的飞舞
两只蝴蝶沿不同轨迹飞的图层关系：
【课堂检测】
1、 引导层的作用就是使运动元件沿着绘制好的路径（引导线）运动。
（ ）
2、 引导线可以是封闭的，起点和终点之间的线条可以是不连续的。
（ ）
3、 引导层中绘制引导线，而在被引导层中设置补间动画。
（ ）
4、 不将对象吸附到引导线上，对象就能沿引导线运动 （ ）
5、 在最终生成动画时，引导线是可以看见的。
（ ）
【课堂评价】。
FLASH编程——蝴 蝶 飞 舞
第1章蝴蝶飞舞实例说明本例将制作一个蝴蝶飞舞的动画。
播放这个动画时，花盆中的小花在长大，伴随着花的开放，一只蝴蝶在翩翩起舞，忽然，小花伸长“脖颈”，将蝴蝶“吞”到“肚”中。
播放的画面如图1.1所示。
图1.1 蝴蝶飞舞的运行画面学习目标通过本例学习，应能熟悉Flash 的时间轴、工具箱、舞台等操作界面，了解Flash 的基本操作和概念，掌握帧和层的应用，学会制作关键帧动画，为后面的复杂动画制作奠定良好的基础。
操作步骤(1) 运行Flash ，选择【文件】|【新建】命令，创建新的Flash 文件，如图1.2所示。
菜单栏时间轴面板 舞台动作、帮助和属性面板的操作界面提 示(2) 舞台的大小是可以设置的，在图1.2下面的【属性】面板中，单击【大小】旁的按钮则会弹出【文档属性】对话框，如图1.3所示。
图1.3 Flash 文档的属性设置对话框在其中的【尺寸】文本框中输入宽和高的尺寸，该范例为360像素(px)×360像素，这样设置也就是说将来的舞台的大小就是360像素×360像素，在图1.3中还可以设置舞台的背景颜色、帧频等选项，本范例中背景颜色为系统默认的白色，帧频设置为8fps 。
单击【确定】按钮完成属性设置。
提 示选择蓝色，，在图1.2所示的舞台图1.4 图层的命名图1.5 用【刷子】工具绘图提示部分选择工具：选择锚点和贝塞尔曲线并变形。
线条工具：绘制直线。
套索工具：按照对象的轮廓选取区域。
钢笔工具：利用锚点绘制曲线或直线。
文本工具：输入文字。
椭圆工具：绘制椭圆或圆。
矩形工具：绘制矩形或多边形。
铅笔工具：绘制自由线条。
刷子工具：表现利用笔刷描绘的效果。
任意变形工具：调整大小、旋转、倾斜、环绕等功能变形对象。
填充变形工具：调整颜色区域和方向。
墨水瓶工具：更改线条或者形状轮廓的笔触颜色、宽度和样式。
颜料桶工具：可以填充空的区域或更改已涂色区域的颜色。
滴管工具：从一个对象拷贝填充和笔触颜色。
VB第5课蝴蝶飞舞
第5课蝴蝶飞舞本课旨在带领学生制作通过M o ve方法用代码控制控件移动的动画程序，让学生认识控件的“方法”，了解控件的“方法”，进而初步形成“方法”的概念。
编写意图在VB6.0中，方法是一个非常重要的概念，对象有对象的方法，窗体有窗体的方法，控件有控件的方法，各方法使用方式相近，功能却又各不相同。
VB6.0作为一门高级编程语言，使用它来编写程序实际上更类似于堆积木，一个个控件就是一块块积木，堆积在一起的控件按照指定的方法最终实现需要的功能。
我们的目的，就是要让学生通过生动形象的编程实例，走近、理解“Move控件方法”，初步掌握“Move控件方法”以及Rnd、LoadPic ture函数的使用方法。
内容分析课文中出示的“蝴蝶飞舞”动画程序共主要涉及到了：为Image控件指定其显示图像、控件数组、RND随机函数、控件属性在程序代码中的调用、Move方法、Ti mer计时器控件的简单应用以及Mo d运算符七个知识点，本课侧重介绍Image控件的“Move方法”的应用。
教学目标1.知识与技能◆理解并掌握Mo ve方法控件的概念及使用方法；◆理解Rnd、LoadPicture函数的使用方法；◆掌握为Imag e控件指定其显示图像的方法；◆初步了解控件数组、RND随机函数、控件属性在程序代码中的调用、Mod运算符以及Timer计时器控件的简单应用。
2.过程与方法◆通过学生自读教材与上机实验，使其能够基本读懂课文中出示的“蝴蝶飞舞”动画程序实例代码，并能使用自己的话进行解析；◆通过对“蝴蝶飞舞”动画程序实例的分析，结合他人的见解，归纳总结出控件的“方法”的基本定义。
3.情感态度与价值观◆在学生尝试自行解析程序代码的过程中培养其对陌生知识勇于探究，大胆尝试的精神和勇气；◆鼓励学生克服畏难情绪，勇于表达自己的见解并能够从中体会到成长的快乐。
小学信息技术六年级上册第5课《美丽的蝴蝶》教案
小学信息技术六年级上册第5课《美丽的蝴蝶》教案（一）年级：六年级上册学科：信息技术版本：冀教版【教材分析】本课旨在通过制作“美丽的蝴蝶”这一主题项目，让学生掌握使用信息技术工具进行图像编辑和网页制作的基本技能。
学生将学习如何运用Photoshop进行图片的扭曲、旋转、翻转等操作，并学会使用FrontPage布局网页，插入图片和文本，修饰网页效果。
同时，通过了解蝴蝶的外形特征和生活习性，培养学生的观察力和创造力，激发他们对大自然的热爱。
教学目标了解使用表格布局模板制作网页。
自主探究法，让学生学习简单设计并制作网页。
教学重难点：重点：掌握Photoshop中图片的基本编辑操作，如扭曲、旋转、翻转等；学会使用FrontPage布局网页并插入图片和文本。
难点：灵活运用所学技能，创作出具有创意和美感的蝴蝶图片和网页。
教学准备：教师准备：Photoshop和FrontPage教学软件、蝴蝶相关素材（图片、视频等）、教学PPT。
学生准备：熟悉计算机基本操作，有一定的信息技术基础。
教学过程：一、导入新课（约5分钟）1. 情境导入：展示一段蝴蝶在花间飞舞的视频或图片，引导学生欣赏蝴蝶的美丽，并提问：“同学们，你们知道蝴蝶有哪些特征吗？它们的生活习性是怎样的呢？”通过学生的回答，引出本课主题——《美丽的蝴蝶》。
2. 明确目标：告诉学生本节课将学习如何使用Photoshop编辑蝴蝶图片，以及如何使用FrontPage制作关于蝴蝶的网页。
二、新知讲授（约20分钟）1. Photoshop图片编辑示范操作：教师边讲解边演示如何使用Photoshop打开蝴蝶图片，进行扭曲、旋转、翻转等操作。
重点讲解图层的使用和切换，以及如何利用工具栏中的工具进行精细编辑。
学生实践：学生跟随教师步骤，尝试对蝴蝶图片进行编辑。
教师巡视指导，及时解决学生遇到的问题。
2. FrontPage网页制作介绍工具：简要介绍FrontPage的界面和主要功能。