五、引导保存、调试、运行程序。 学生保存、调试、运行程序。 六、练习设计 1. 对象的三要素是什么？ 2. 除了在属性窗口中直接设置对象的属性外，还可以利用属性赋值语句设置对象的属性。请在“别碰我”程序中找出设置对象属性的具体语句。 3. “Label1”对象中存放了哪些程序段？这些程序段分别通过什么事件进行激发？ 4. Form1.Cls中的Cls是“Form1”对象中的一种方法，试分析Cls方法的功能。 七、小结 说明：教学过程包括预习内容与指导、展示交流、点拨升华、作业反馈等内容。
课题名称 教学目标 教学重点 教学难点 综合练习——编写“找较大数”程序 ◇理解计算机的逻辑判断是通过选择结构来完成的。 ◇逐步培养学生严谨、科学的程序设计思想。 综合实践的应用。 解决程序问题。 1．启发式教学法 教学方法及教具 2．探索学习法 3．多媒体辅助教学 4．任务驱动式教学 课时数 环节 教学内容 教师活动 一、复习： 上节课我们学习了条件语句的结构，以及关系表达式与逻辑表达式。 回顾条件语句的结构； 回顾关系表达式与逻辑表达式。 1 第一课时 二次备课 学生活动 条件语句的格式。 格式一： If <条件> then <程序段A> Else <程序段B> End if 格式二： If <条件> then <程序A> End 关系表达式与逻辑表达式 判断一个数是否被10整除的表达式为： X/10=int(X/10) 教学随记 教学过程 二、师生共同体验“找较大数”程序的功能，并明确学习任务。 1）输入两个不相同的数； 2）计算机输出其中较大的数； 三、算法分析（绘制流程图） 流程图一： 分析流程图，并完成下面程序填空： Dim a As Double Dim b As Double a = TextBox1.Text b = TextBox2.Text If a>b Then A=b End If Label4.Text=a 分析第二个流程图，并完成下面程序。 Dim a As Double Dim b As Double a = TextBox1.Text b = TextBox2.Text If a > b Then Label4.Text = a Else Label4.Text = b End If 流程图二: 四、引导学生深入探究 [探究任务]输入三个数，找出最大数。 [提示]对于找最大数任务，要分两步做，先找出前两个数中较大的数，再用前两个较大的数与第三个数比较，再找出其中较大的数。 分析、讨论，绘制流程图： 五、学习本节课主要要掌握两点： 1.理解计算机的逻辑判断是通过选择结构来完成的。 2.学会用VB中的条件语句实现选择控制结构。 说明：教学过程包括预习内容与指导、展示交流、点拨升华、作业反馈等内容。
泰山版初中信息技术VB部分教案（2012版） - 图文
