《第10课 顺序结构》参考教案.docxVIP

学而优教有方

PAGEPage1/NUMPAGESPages6

第十课顺序结构（第1课时）

教学目标

1、知识目标：

掌握顺序结构程序的特点

熟悉val（）函数的用法

了解变量的知识

2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。

3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。

前提诊测

1、1、滚动条控件的用法？

导入新课

按顺序办事，是我们经常采用的工作方式，在vb中我们也会见到“按顺序办事”的程序

教学方法

任务驱动法、演示操作法

教学重点

滚动条控件、rgb（）函数

教学难点

编写代码、调试程序

教学过程

一、分析示例程序“计算长方体的表面积”

二、设计程序“计算长方体的表面积”

1、设计程序界面

1.1创建新工程

1.2绘制窗体界面：三个文本框，三个命令，一个标签和一个框架

2、修改对象属性

对象

属性

属性值

Frm1

caption

计算长方体的表面积

borderstyle

1-fixedsingle

Frame1

caption

请输入长、宽、高

Text1

（名称）

txta

text

?

Text2

（名称）

Txtb

text

?

Text3

（名称）

txtc

text

?

command1

（名称）

cmdcal

caption

长方体的表面积为

Command2

（名称）

Cmdclear

caption

重新计算

command3

（名称）

Cmdexit

caption

退出

label1

（名称）

lblmj

caption

?

3、编写程序代码

PrivateSubcmdCal_Click()

DimaAsSingle,bAsSingle,cAsSingle

a=Val(txtA.Text)

b=Val(txtB.Text)

c=Val(txtC.Text)

s=2*(a*b+b*c+c*d)

lblMj.Caption=s

EndSub

PrivateSubcmdClear_Click()

txtA.Text=

txtB.Text=

txtC.Text=

lblMj.Caption=

EndSub

PrivateSubcmdExit_Click()

End

EndSub

4、调试并保存程序

5、生成可执行程序

形成性测试

制作程序“计算长方体的表面积”

小结

本课我们学习了顺序结构，在这种结构的程序中，计算机按照”从上至下“的顺序逐条执行语句。

板书设计

第十课顺序结构

一、分析示例程序

二、设计程序

作业

P851

第十课顺序结构（第2课时）

教学目标

1、知识目标：

掌握顺序结构程序的特点

熟悉val（）函数的用法

了解变量的知识

2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。

3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。

前提诊测

1、1、滚动条控件的用法？

导入新课

按顺序办事，是我们经常采用的工作方式，在vb中我们也会见到“按顺序办事”的程序

教学方法

任务驱动法、演示操作法

教学重点

滚动条控件、rgb（）函数

教学难点

编写代码、调试程序

教学过程

一、上机练习

二、教师指导

三、知识点补充

1.算术表达式

2.变量

3.数据类型

4.val（）函数

形成性测试

制作程序“计算长方体的表面积”

小结

本课我们学习了顺序结构，在这种结构的程序中，计算机按照”从上至下“的顺序逐条执行语句。

板书设计

第十课顺序结构

一、分析示例程序

二、设计程序

作业

P851