山东省临沭县第三初级中学八级信息技术下册《节约用水算水价》教案.docVIP

第4课 节约用水算水价 教学目标 1、了解流程图的使用方法，了解一般编程过程。 2、了解变量、数据类型，能定义实型变量和整型变量。 3、学会变量进行赋值。 4、会使用IF语句、会使用算术运算符进行四则运算。 5、通过对代码编写的学习，培养学生自主完成程序的能力。 教学重点： 1、学会使用If条件选择语句，解决简单的问题； 2、学会使用算术运算符进行四则运算代码设计。 教学难点： If条件选择语句 学生的学习方式： 自主学习，合作学习，探究学习 教学策略： 设置情景-----提出问题；师生讨论-----探究问题；独立探索，小组合作----解决问题；交流、总结----完成任务、开拓思维――实践创新。 课时安排：２课时 教学过程： 导入：为了提高节水意识，促进人们形成良好的用水习惯，物价部门对居民用水实行阶梯式水价：若用水量小于或等于12吨，价格为2.85元/吨；若用水量大于12吨，大于12吨的部分，价格为：2.85×2元/吨。现在我们就替物价部门设计一个这样的计算水费的程序。 环节一：分析收取水费问题，画出其流程图。 学生分组讨论画出流程图。 环节二：界面设计 1、构建界面：学生操作，添加控件，完成界面设计。 2、设置对象属性： 根据程序界面，在属性窗口中设置每个控件的属性值。采用自主探究和合作学习形式。 环节三：代码编写，调试，运行。 学生参考课本，自主学习探究。 教师引导学生理解If语句的用法，引导学生理解赋值语句，总结VB中常见的数据类型。 教师准备几个If条件语句小程序，让学生去读程序，引导学生加深对If 语句的理解。 环节五：总结（学生分组总结，汇总） 1、编写程序过程中用到的控件的属性设置及用法 2、程序中用的到分支结构If语句 3、用到的函数、数据类型、变量、定义变量、变量赋值、算术运算符 环节六：实践与创新 设计一个程序“我怎么样？” 输入学生成绩，如果成绩大于等于96分，就输出“very good!”，如果成绩小于96分，就输出“don’t give up”。分组讨论，互助合作，完成任务 教学反思 这节课通过２课时学习，学会分析问题，用流程图描述程序，程序中用到了分支结构If 语句，教师也可以写一些简单的程序让学生读程序，说出程序的运行结果，加强对If语句的理解。 第４课 节约用水算水价 一、导入新课 为了提高节水意识，促进人们形成良好的用水习惯，物价部门对居民用水实行阶梯式水价：若用水量小于或等于12吨，价格为2.85元/吨；若用水量大于12吨，大于12吨的部分，价格为：2.85×2元/吨。现在我们就替物价部门设计一个这样的计算水费的程序。 二、分析问题（解决对程序感知的两个问题：程序有几个事件？分别改变的是什么对象的何种属性？如何做？） 分析收取水费问题，画出其流程图。 学生分组讨论画出流程图。 三、界面设计（解决五个问题：控件的添、删、移、缩、设置属性。界面怎样做？） 1、构建界面：学生操作，添加控件，完成界面设计。 2、设置对象属性： 根据程序界面，在属性窗口中设置每个控件的属性值。采用自主探究和合作学习形式。 设置控件属性： Label1.Caption Text1.Text Text1.Locked Command1.Caption Form1.Caption 四、编写代码（解决两个问题：要有几个对象的什么事件？每个事件要修改的是哪些对象的什么属性？） 代码编写，调试，运行。 学生参考课本，自主学习探究。 教师引导学生理解If语句的用法，引导学生理解赋值语句，总结VB中常见的数据类型。 教师准备几个If条件语句小程序，让学生去读程序，引导学生加深对If 语句的理解。 1、计算Command1的Click事件代码 Private Sub Command1_Click() Dim x, y As Single x = Val(Text1.Text) If x = 12 Then y = 2.85 * x Else y = 12 + 2.85 * 2 * x End If Text2.Text = CStr(y) End Sub 2、清空Command2的Click事件代码 Private Sub Command2_Click() Text1.Text = Text2.Text = End Sub 3、退出Command3的Click事件代码 Private Sub Command3_Click() End End Sub 4、窗体Form1的Load事件代码 Private Sub Form_Load() Label3.Caption = 说明： vbCr 小于或等于12吨，价格为2.85元/吨； vbCrLf _