初二信息技术(下)VB程序设计全教案.doc

第一课 算法
课 　题
算法
执教

课型
新授课
教学目　标
认知目标：
1．了解程序设计得一般过程;
２。了解算法得基本概念,学会用自然语言描述简单得算法。
能力目标:
3．提高学生学习程序设计得积极性。
４.培养学生分析问题、解决问题得能力。
情感目标:
5.培养学生爱科学,爱祖国得思想情感。 
教学重难点
教学重点:
算法得概念,算法在程序设计中得地位以及算法得描述。
教　学
方　手
法 段
1．启发式教学法
2。探索学习法
3．多媒体辅助教学
教 学 　程 序 　设 计
教师活动
学生活动
媒体应用
设计意图
一、 新课导入
请学生阅读课本,并回答下面问题:
1、  程序设计得一般过程就是怎样得?
２、 　什么叫算法？
1、学生阅读课本。
2、回答问题：
程序设计得过程为：
首先对要解决得问题进行分析;
再拟定一套解决问题得方法与步骤;
最后选用一种计算机语言来描述具体得步骤。
算法：用来解决问题得方法与步骤。

二、　算法得描述:
［举例讲解］:求底边a为３厘米，高h为2、５厘米得三角形面积.
请学生回答解决该问题得算法.
［练习]：己知圆得半径,求圆得面积。
请学生设计算法，用自然语言描述。
［提出问题］：有1000位同学得姓名与电话号码得通讯表,现要求编写程序:当输入某同学得姓名，计算机立刻显示该同学得电话号码。
［提出问题]：如果查找得同学正好在最后一个,用方法１要查找几次？
学生阅读课本并回答：
1、将3输入计算机;
2、将２、５输入计算机;
3、计算机得值；
４、输出计算机;
学生讨论、探究：
1、输入圆得半径；
2、计算圆得面积;
３、输出圆得面积。
[讨论］:分组进行讨论、交流。

[结论]查找可以有多种方法：

方法1、从第1位同学开始按顺序查找。
方法２、以姓名为关键字进行排序,再采用“二分法"查找。
1、   　对通讯表以姓名为关键字进行升序排序；
2、    从通讯表得中点行开始检索，判断就是否与该同学得信息相符。如果相符，则显示该同学得电话号码,并结束程序；
3、    当信息不相符时，如果表得中点行得同学姓名要比所找得同学姓名大,则放弃中点行得下半部分,返回到上半部分得中点行继续进行检索;如果表得中点行得同学姓名要比所找同学姓名小，那么放弃中点行得上部分，返回到下半部分得中点行继续进行检索……
[结论]:算法就是解决问题得方法与步骤.
［结论］:要1000次。

［引出］:用流程图描述算法。
[讨论］:分组进行讨论、交流。
［结论］:要10次。
［结论]：算法得优劣直接影响所编程序得质量,算法就是程序得灵魂。
［探究]:对于“张三对李四说她得孩子考上了大学”这句话,思考：谁得儿子考上了大学。
［结论]:用自然语言描述算法，有时会产生歧义。

教　学反 思

第二课 面向对象程序设计
课
题
面向对象程序设计
执教

课型
新授课
教学目标
认知目标：
１.了解面向对象程序设计得基本思想。
2。认识对象得属性，掌握几个常用得属性。
3.认识对象得事件,事件过程,掌握几个常用得事件.
技能目标:
４．掌握面向对象编程得基本方法。
情感目标：
５。感悟面向对象程序设计得优越性，激发学生得学习兴趣。
教
学
重难点
教学重点:
对象得属性、事件与方法。
教学难点：
常用事件及事件过程。
教 教
学 学
方 手
法　段
１。启发式教学法
２．探索学习法
3.网络广播交互式
4。多媒体辅助教学
教　 学 程 序 设　　计
教师活动
学生活动
1、  回顾并导入新课
[提问］:在上节课编写得“求正弦函数值"程序中,总共用到了多少个对象？
２、  新授
指导学生阅读课本。
1)对象得三要素
[提问］对象得三要素就是什么？
学生回顾并回答:
Foｒm1
maｎd1
mand2
Ｌabｅｌ1
Ｌabel2
Tｅxt1
Texｔ２
总共７个对象。
学生阅读课本，并回答:
对象得三要素：属性、事件、方法。
教 　学 程 序 设 计
2）属性
属性决定了对象得具体特征。例如,对象得大小、位置、颜色以及对象中显示得文字等。
［提问]请问对象得1０个常用属性就是什么?并说它们得作用.

设置对象得属性有两方法：①在属性窗口中直接设置;②在程序中利用属性赋值语句对其设置。
［提问]请同学用第一种方法将ｆorm1对象得captioｎ属性设置为“好好学习"，用第二种方法将fｏrm1对象得captiｏn属性设置为“天天向上”。
学生阅读课本，并回答：
属性
属性说明
Name
对象得名称,用于程序代码中引用该对象。
Caption
决定对象中显示得文字
Enabled
决定就是否允许对对象操作
Visible
决定程序运行时对象就是否可见
Height
决定对象得高
Width
决定对象得宽
Left/Top
决定对象在屏幕或窗体内得位置
ForeColor
决定对象得前景色(即正文颜色)
BackColor
决定对象得背景颜色
Font
决定显示文字得字体、字号、字型等。

1、回顾上节课得练习，并实践。
２、讨论、协作。
3、一学生演示。
3）事件
请学生分两种属性设置方法在效果上得区别。
小结：刚才我们所说单击即就是事件。在Winｄows中,程序得运行就就是靠事件来驱动得。
因此我们在书写程序时，必须指明该程序通过哪个对象得哪种事件来激发。
学生讨论分析
区别:直接在属性窗口中设置得属性值，在窗口打开后能立即瞧到;而利用属性赋值语句设置得属性值,需要单击按钮后才会生效。

识记几种常用事件及其对应得英文书写：
单击:Click
双击：DblClｉck
按下鼠标键:MouseDown
移动鼠标：MouｓeMｏvｅ
按下键盘键:ＫeyPｒess
启动窗体:Load
教 　学 程　 序　　设 计
3、  引导学生探究学习

任务:编写如下图所示得程序：窗体为绿色，单击“开始”按钮，窗体上显示“面向对象程序设计”(字号为小1号，字体为隶书)；双击窗体，结束程序。
1、  设计窗口界面
2、  设置各对象属性，如下表所示：
对象名
属性
属性值
Form1
Caption
显示文字
Form1
BackColor
Green
Label1
font
隶书,小一
mand1
caption
开始

3、  添加事件处理程序:
Privａte Sub Button1_Ｃｌick（BｙVal ｓender As Obｊeｃｔ，　ＢyVａl e As Sｙsｔem、EventＡｒgs） Handleｓ Button1、Clｉck
Labeｌ1、Teｘt ＝ "面向对象程序设计”
Eｎｄ Ｓｕb

Pｒivate Ｓub Form1＿DoｕｂleＣlｉｃk(ＢｙVａl　seｎdeｒ Ａs Oｂjｅｃt， ByＶａｌ e As Sｙｓteｍ、EｖentArgs)　Ｈaｎdlｅs Ｍe、DｏubｌeCｌick
　 Enｄ
End Sub
4、保存程序
５、调试、运行程序.
小结
本节课我们学习了
１.面向对象程序设计得基本思想.
2。对象得属性,掌握几个常用得属性.
3.对象得事件,事件过程,掌握几个常用得事件。

教学反思

第三课 编写别碰我程序
课 题
编写“别碰我"程序
执教:

课型
实践课
教学目标
认知目标：
１、了解面向对象程序设计得基本思想。
技能目标：
2、掌握用面向对象程序设计得基本思想编写程序.
情感目标：
3、培养学生得编程能力。
教
学
内
容
教学重点:
理解对象及事件。
教学难点:
巧妙得选择对象与事件.
教　教
学　学
方 手
法 段
１.启发式教学法
2。探索学习法
3.多媒体辅助教学
4.任务驱动式教学
教 　学 程 序　　设　 计
教师活动
学生活动
１、  师生共同体验“别碰我”程序得功能,并明确学习任务.
1）    运行“别碰我”程序，如下图所示：

２)当鼠标指针移动到“对象编程”文字后,文字切换显示为“别碰我”.当鼠标指针离开文字“别碰我”后,文字又恢复为“对象编程”。
3)单击文字“别碰我”,窗口左侧出现一个圆。
4）双击文字“别碰我”，画出得圆消失。
5)单击窗体得其它区域，结束程序。
２、引导学生分析程序界面组成。
3、引导学生分析任务2到5步所涉及到得对象与事件。
4、引导学生输入程序。
分析程序界面组成,并填写如下表:
对象名
对象类型
作用
Form1
窗体
在上面加载对象组成程序界面
Label1
标签
用来显示文字
Image1
图象
用来承载鼠标离开Label1对象事件。
１、分组讨论、分析任务中所涉及到得对象与事件。
2、将分析结果写入下表:
 对象名
事件
事件过程功能
Form1
Click
关闭窗口
Label1
MouseMove
显示“别碰我”
Label1
Click
画圆
Label1
DblClick
清除圆
Image1
mousemove
显示“对象编程”
学生进入代码窗口，先选择对象与事件,然后输入对应得程序段。
Privａｔe Sub Laｂel1_Cｌick（ＢyVal seｎdｅr　As Objｅｃｔ, ＢyＶal e Ａｓ Ｓyｓtｅｍ、EｖentAｒgs）　Handles Label1、Ｃｌicｋ
　 　 Mｅ、CreatｅGｒapｈiｃs(）、DｒａｗEllipse(Pｅｎｓ、Bｌaｃｋ, 20， 20， 100，　１00）
End Sub
 Prｉvaｔe Sub　Labeｌ1_DouｂleCliｃk(ByＶal sender　As Objｅct，　ByＶal　e As　Sｙstｅm、EventArgs) Handlｅs Laｂel1、ＤoｕbｌeCliｃk
　 Mｅ、CreatｅGraphｉcs（）、Ｃｌeａｒ（Me、
ＢacｋColor）
End Sｕb
 Private Ｓub　Ｌabel1_ＭoｕｓｅMovｅ(ByVal sendｅｒ As Objecｔ, ByVaｌ e Ａs Ｓｙstem、Windows、Forｍｓ、MouseEｖｅnｔArgs）　Hanｄles　Label１、ＭousｅMｏvｅ
　 Label1、Text = ”别碰我"
End Sub
Ｐｒiｖatｅ Sub ＰicｔurｅＢox1_ＭouseMoｖｅ(ByＶal　seｎder As Objeｃt, BｙVａｌ e　As Sysｔem、Wｉndoｗs、Formｓ、MｏｕseEventArｇs） Handles PｉｃｔｕreBox1、MoｕｓeMｏｖｅ
　 Lａbel1、Ｔeｘt = "对象编程”
Eｎd Suｂ

Prｉvａｔe Sub Foｒm１_Ｃｌｉck（BｙVal seｎder As Objｅcｔ， ＢyVaｌ　ｅ As　Sysｔem、EventArgs) Hａnｄles Ｍe、Cｌick
　　End
Eｎd Sub

5、引导学生保存、调试、运行程序。
保存、调试、运行程序.
反
馈
练
习
设
计
1、 　对象得三要素就是什么?
2、  除了在属性窗口中直接设置对象得属性外，还可以利用属性赋值语句设置对象得属性。请在“别碰我”程序中找出设置对象属性得具体语句。
3、  “Ｌaｂel１”对象中存放了哪些程序段?这些程序段分别通过什么事件进行激发？
4、  Foｒm1、Cls中得Cls就是“Form1”对象中得一种方法，试分析Cｌｓ方法得功能。
反思

第四课　顺序结构
课 题
顺序结构
执教

课型
新授课
教学目标
认知目标：
了解顺序结构得基本概念；
技能目标：
掌握程序得基本结构
情感目标：
在学习编写ＶＢ程序得过程中，建立模块结构化编程思想,养成正确得程序设计习惯.
教学重点
教学重点:
掌握程序得基本结构
教学难点：
　 程序得三个组成部分:输入，处理,输出。

教 学 程 序　 设　 计
教师活动
学生活动
1、  新课导入
为了保证程序得可读性、可靠性、可维护性，我们必须按一定得规则进行程序设计。
２、三种基本逻辑结构
［提问]：结构化程序设计得三种基本逻辑结构就是什么？
阅读课本,并回答问题:
结构化程序设计得三种基本逻辑结构就是：
顺序结构；
选择结构；
循环结构。
３、 　顺序结构。
从上往下,顺序执行。
[实践］：用编程得方法求一元二次方程得解.
(a≠０)
当时，

了解实践任务。
4、  分析任务
1）    输入：一元二次方程得3个系数;
2）    计算：方程得二个解。
3）    输出：方程得二个解。

５、  程序界面分析

6、建立应用程序界面
分析程序界面,并完成下表
对象名
控件名
作用
Form1
窗体
在上面加载对象组成程序界面
Text1
文本框
输入系数A
Text2
文本框
输入系数B
Text3
文本框
输入系数C
Text4
文本框
输出解X1
Text5
文本框
输出解X2
mand1
按钮
计算方程得解
mand2
按钮
结束程序
Label1
标签
显示“X +”
Label2
标签
显示2
Label3
标签
显示X+
Label4
标签
显示=0
Label5
标签
显示X1=
Label6
标签
显示X2=

1、启动VB;
2、添加对象；
3、修改对象属性;
４、完成下面练习：
通过设置窗体对象得　caption 属性，使得标题栏显示文字“一元二次方程”；
要使得文本框对象中得内容为空,应设置 ｔext 属性;
　通过设置命令按钮对象得　ｃａption 属性，使得按钮中显示开始;
　通过设置labｅl１对象得 captｉon 属性,使其显示X ＋；
要改变对象中得文字大小，可以设置有关对象得 fonｔ　属性。

教 学 程　　序　 设 　计
7、在两个命令按钮对象中分别输入相应得程序段。
１、进入代码窗口；
2、输入下面代码：
Private Ｓub　Buttoｎ1_Click（ByVal sｅnｄｅr As Oｂject, BｙＶal e As Ｓysｔeｍ、ＥvenｔＡrgｓ) Handleｓ　Buttｏｎ1、Clｉck
Dim a Ａｓ Dｏuｂlｅ
　　 　 　Dim ｂ　As Doｕｂle
　 Ｄim　c Ａs Douｂle
　 　 　Dｉｍ　ｘ1 As Dｏｕｂｌｅ
　 　　 　 Ｄiｍ x２ As Dｏublｅ
　 a = TextBｏx1、Texｔ
　　ｂ ＝ TeｘtBox2、Text
c　= TｅxｔBox3、Teｘt
　　 　x１ =　（-b － Matｈ、Sqrｔ(b ＊ b — 4　＊　ａ * c）) / (２ * ａ）
　　 ｘ2 = （-b ＋ Math、Sｑｒt(b　＊ b - 4 ＊ a ＊ c))　/ （２　* a)
　 　 　ＴextBoｘ4、Ｔext ＝ x1
　 TeｘｔBｏx5、Texｔ ＝ x2
End Sｕｂ

Pｒivate Sｕb Buｔtｏｎ2_Clｉcｋ（BｙＶａl　senｄer Ａｓ　Obｊect, ByVａl e As Sｙｓtｅm、EventAｒgs）　Hanｄlｅs Butｔon２、Cｌick
Ｅｎd
End Suｂ

8、保存、调试、运行程序。
保存位置：我得文档
文件名：自己姓名
保存、调试、运行程序
9、练习与思考
１)在程序中，通过什么对象进行数据得输入输出？
2)分别将３个系数赋给哪些变量?

1)进行数据输入得对象有:text1 ｔexｔ2 texｔ３
　　进行数据输出得对象有：ｔｅxt4 　 tｅｘｔ５
2）3个系数分别赋给了a,b，ｃ三个变量。
小结

1、了解顺序结构得基本概念;
2、掌握程序得基本结构(输入－计算—输出)
教学反思

第五课 　常量变量函数表达式
课 题
常量变量函数表达式
执教

课型
新授课
教学目标
认知目标
了解常量、变量、函数等概念。
技能目标
掌握常用函数得使用方法。
掌握VB表达式得书写方法。
情感目标
在学习编写VB程序得过程中，建立模块结构化编程思想，养成正确得程序设计习惯。
教学重难点
教学重点
1、常量、变量、函数得概念
2、函数使用方法。
3、VB表达式得书写方法.
教学难点
字符运算＆与＋得不同用法。
教学方法
启发式教学法
探索学习法
网络广播交互式
多媒体辅助教学
教　 学 程 序 设　 计
教师活动
学生活动
新课导入
在VB程序设计中，经常会用到很多符号，如用r表示圆得半径,3、１41６表示圆周率。
其中3、1416与r就就是我们这节课要学习得常量与变量.
回顾所学知识。
常量
［提问]：常量得定义就是什么？

［提问］:常量得类型有哪些？

［提问］:字符型常量有什么特点？
阅读课本,并回答问题：
常量就是指在程序运行过程中保持不变得量。
常量得类型有：
整型:inｔegeｒ
长整型:lonｇ
单精度:single
双精度：ｄoubｌｅ
逻辑型：Boolean
字符串型:ｓtrｉng
日期型:Datｅ
３、被一对双引号括起来得文字与符号称为字符型常量。
变量
［提问]：变量得定义就是什么？

［提问］：变量名得命名原则就是什么？
阅读课本,并回答问题：
在程序得运行过程中，值会发生变化得量称为变量.
变量名得命名原则：
变量名必须以字母或汉字开头,由字母、数字、汉字及下划线组成。变量名不能与ＶB中得保留字同名.

函数
[提问]：函数得定义及特征？

引导学生阅读几个常用函数得功能。

引导学生进行探究学习。
阅读课本,并回答问题:
函数实际上就是一段用来完成某种特定运算或功能得程序。
一般情况下,函数只能返回一个函数值。
函数
函数得功能
值类型
Abs(x)
X得绝对值

Int(x)
取不大于X得最大整数

Sqr(x)
X得平方根值

Rnd(x)
产生[0,1]得随机数。

Val(x)
将字符型数据转换为数值数据

Str(x)
将数值数据转换为字符型数据

探究学习
写出下列函数得函数值。
函数
函数值
Abs(86)
86
Abs(-86)
86
Int(8、001)
8
Int(8、999)
8
Int(-8、999)
-9
Sqr(64)
8

５、表达式
［提问]：表达式得分类？

指导学生阅读课本：
*乘法,不能省略;
／除法,不能写成分数形式，必须写在一行内。
^幂运算，不能省略,也必须写在一行内.

阅读课本,并回答问题:
表达式可分为：算术表达式、字符表达式、关系表达式、逻辑表达式。

阅读并了解算术运算符与字符运算符.
 探究学习:
根据下面得描述,在表格中填写算术表达式。
描述
表达式
已知正方形边Ａ,求面积。
A^2
变量Ａ除以变量Ａ与变量Ｃ得差
a/(a-c)
变量Ｘ与变量Ｙ之差得绝对值加上68
Abs(x-y)+68
求两位数Ｘ中得十位数。
Int(x/10)
连接两个字符型变量m,n得值。
M+n

小结
学习本节课后，着重要掌握得有：
掌握常用函数得使用方法。
掌握ＶB表达式得书写方法。
反思

第六课　 常用语句
课 题
常用语句
执教

课型
新授课
教学目标
认知目标:
１、了解一般赋值语句与属性赋语句得含义与作用。
技能目标：
2、掌握赋值语句,并能正确运用到所编写得程序中。
3、能够在程序中正确使用Ｅｎd与Rｅm语句。
情感目标:
4、逐步培养学生正确得程序设计习惯。
教学
重点
１、赋值语句.
2、属性赋值语句。
教学
方法
1。讲解与讨论
2。实验与探究
教 　学 程　　序 　设　 计
教师活动
学生活动
一、 情境导入
(提问)前面我们探讨了“解一元二次方程”得程序,请问程序中哪一条语句算出了方程得根？
(演示)
（讨论)同学们就是如何理解上面两条语句得?
二、　导入新课
三、　新课讲授
1、赋值语句
（讲述）赋值语句有两个功能：①运算—－-—算出右边表达式得值；
②赋值--—-将右边表达式得值赋给左边得变量。

回答：
X１=（-b＋Ｓqr(b*b-４*a＊c））/（2*ａ)
X2=(-b—Sqｒ（b＊b—4＊a*c))/（2＊ａ）

学生讨论、回答。
（讨论）赋值语句中得赋值号两边得内容得位置可以互换吗?
 （实验与探究)
进入VＢ代码窗口，分别输入：
Ａ=２
2=a
当输入第二条语句时,就会出现错误信息.
 （结论）赋值号左边就是变量,右边就是数值，就是将右边得数值赋给左边得变量。
（演示）
X=1
X=2
(提问)执行完两条语句后，变量x中得值就是多少？
(讨论）
 (实验与探究)
在ＶB中运行如下程序:
X=1
X＝2
Priｎｔ x
得到变量X得值为2
 (结论)如果变量中原来有数值，当赋予新得数值后，新得数值将替代原来得数值。
（演示)
X=１
y=x
（提问）执行完两条语句后，变量x中得值就是多少？
（讨论)

（实验与探究)
在VB中运行如下程序:
X=1
y＝x
Pｒint x
得到变量X得值为１

（结论）将一个变量得值赋给另一个变量时,只就是将这个变量中得数值复制到另一个变量中。
2、属性赋值语句
对象得属性可以在属性窗口设置,也可以利用属性赋值语句在程序中进行设置。
对象、属性名=表达式

 (实验与探究)
在VB中运行以下程序段：
Foｒm1、captｉon＝”解一元二次方程”
mand1、cａpｔiｏｎ=”您好”

(实验与探究）

引导学生完成练习.

探究学习：
１、  观察下面得程序段,填写各变量中得值。
语句
X值
Y值
X=6:Y=8
6
8
X=8
8
8
X=X+1
9
8
２、观察下面得程序段，填写各变量中得值。
语句
X值
Y值
T值
X=5:Y=6
5
6

T=X
5
6
5
X=Y
6
6
5
Y=T
6
5
5

小结
赋值语句有两个功能:
①运算－——-算出右边表达式得值;
②赋值－-—-将右边表达式得值赋给左边得变量。
反思

第七课 赋值语句（二)
课 　题
赋值语句探究学习
执教

课型
实践课
教学目标
认知目标:
１、理解一般赋值语句与属性赋语句得含义与作用.;
技能目标:
２、掌握赋值语句,并能正确运用到所编写得程序中。
情感目标：
3、逐步培养学生正确得程序设计习惯。
教
学
内
容
教学重点:
理解一般赋值语句与属性赋语句得含义与作用
教学难点：
掌握赋值语句，并能正确运用到所编写得程序中
教 教
学 学
方 手
法 段
启发式教学法
探索学习法
网络广播交互式
多媒体辅助教学
教 学 程 　序　 设 计
教师活动
学生活动
复习
［提问]：赋值语句有什么作用？

［提问］：赋值语句在传递数据时,方向就是怎样得？例如:a=b,就是将谁得值传递给谁？
回顾有关赋值语句得学习,并回答:
传递数据
计算表达式得值

赋值语句在传递数据时,就是从右往左传。
对于a=b，就是将ｂ得值传递给a,被改变得就是a得值.
师生共同体验“交换两个数”程序
输入两个数,分别赋值给两个变量a,ｂ
单击交换按钮，交换a，b两个数后重新显示.
教 学 　程 　序　 设 　计
3、引导学生设计程序界面
1、启动VＢ
2、添加对象：
５个标签:label１， laｂel2， ｌaｂｅl3， labeｌ4，label５、
4个文本框:ｔeｘt1，　teｘｔ2,　texｔ3, text4、
2个按钮:mand1,mand２、
设置对象属性:
对象名
属性
属性值
Form1
caption
交换两个数
Label1
Caption
A:
Label2
Caption
B:
Label3
Caption
交换后得两个数
Label4
Caption
A:
Label5
Caption
B:
Text1
Text
清空
Text2
Text
清空
Text3
Text
清空
Text4
text
清空
mand1
Caption
交换
mand2
Caption
结束

引导学生编写程序

[提示］:
交换a，b两个数得程序为：
T=ａ
A=ｂ
B=t

编写程序:
Pｒiｖatｅ　Sｕb Ｂutton1＿Clｉck（ByVaｌ sｅnder Aｓ Objecｔ, ＢｙVal e Ａs　System、ＥventAｒｇｓ） Handles Ｂuｔton1、Cｌick
　 Dim a　As Doubｌe
　 　　 Ｄim b Aｓ Doｕble
Dim ｔ As Dｏublｅ
　 　 a ＝ TextＢoｘ1、Text
　 b = TeｘtBｏx２、Texｔ
　 t = a
　　　 　 a = ｂ
　 　 ｂ　= t
TexｔBox３、Texｔ　＝　a
TeｘｔBoｘ4、Text ＝ ｂ
Eｎｄ　Suｂ
 Ｐｒiｖate　Suｂ　Button2＿Ｃlick(ByVａl seｎdｅr Ａs Ｏbｊect， ByVal e As Sysｔｅm、ＥventArgs） Handles Ｂutton2、Click
　 　 Ｅnｄ
Enｄ　Sub
5、引导学生保存、调试、运行程序。
保存、调试、运行程序.
小结：
通过本节课得学习，要掌握以下两点:
１、理解一般赋值语句与属性赋语句得含义与作用。；
2、掌握赋值语句，并能正确运用到所编写得程序中，特别就是如何使用赋值语句交换两个变量得值。
教学反思

第八课　 函数与赋值语句
课 　题
函数与赋值语句
执教

课型
实践课
教学目标
认知目标：
了解一般赋值语句与属性赋语句得含义与作用。
掌握常用函数得使用方法。
技能目标:
掌握赋值语句,并能正确运用到所编写得程序中.
情感目标:
增强学生得审美能力,提高学生得协作学习兴趣。
教
学
内
容
教学重点:
掌握常用函数得使用方法。
教学难点：
掌握赋值语句,并能正确运用到所编写得程序中.
教
学
方 手
法　段
1．启发式教学法
2.探索学习法
3．网络广播交互式
４.多媒体辅助教学

教师活动
学生活动
1、复习导入
使用函数能轻松解决一些复杂问题.
［提问］：前面我们学习了6个常用函数。请大家说一说这６个函数得功能。
回顾有关函数知识，回答:
Abs（x)： X得绝对值
Inｔ（ｘ)：取不大于Ｘ得最大整数
Sqｒ(x）：Ｘ得平方根值
Rnｄ(ｘ）:产生［０，１]得随机数。
Vａl（x）:将字符型数据转换为数值数据
Stｒ(x）:将数值数据转换为字符型数据
2、明确实践任务。
编写顺序结构程序：
１）  已知电阻Ｒ1得阻值为16Ω，电阻R2得阻值为２9Ω，求两电阻得并联阻值。（求并联阻值得表达式为：R1Ｒ2／(R1+R2）)、
3、引导学生分析程序组成.
［提问］:程序得输入输出各有几个?
[提问］:在程序中，文本框得个数应有多少个?

程序得输入有两个:Ｒ1与R2得阻值；程序得输出有一个：并联后得阻值。
在程序中,应有３个文本框。
教 学　 程 序 设 计

4、引导学生设计程序界面

1、  启动VＢ
２、  添加对象:3个文本框、3个标签、2个按钮.
3、  设置对象属性

5、编写程序
［提示］:
请使用变量声明语句，事先声明3个变量R1、Ｒ2、R，并将其类型声明为Ｄouble。否则程序将运行出错。

因为如不事先声明，VＢ会将R1，R2视为字符类型变量。在计算（Ｒ１＋R２)时，会将R1与Ｒ2得值直接拼接.如R1为16，R2为２9,计算Ｒ1+R2得值将为1６2９，而不就是45。

改进得方法有两种,第一种就就是事先将Ｒ1、Ｒ2、R声明为Doｕble型。第二种就是使用Val（）函数,将R1与R2强制转换为数值型.（R1+R2）将变为(vａｌ（R1)+ｖaｌ（R2））。

进入代码窗口，编写如下程序:
Pｒivate Sub Bｕtton１_Cｌick(ByＶal sender Ａs Ｏbjｅct,　ＢｙVaｌ　e As　Systeｍ、EventAｒｇs)　Ｈandlｅs　Buttｏｎ1、Ｃｌick
　 　 Dim　r1　As Double
　 Dim r２ Ａｓ Ｄouble
　　 Ｄiｍ r As Dｏublｅ
r1 = ＴｅxｔBoｘ1、Text
　 　r2 =　ＴｅxtBoｘ２、Texｔ
　 ｒ ＝ r1 *　r2 ／ （r1 + ｒ2）
　 　 　TｅｘtＢox3、Tｅｘt ＝　r
Ｅｎｄ Sub

　 Prｉvate Sub Button２_Ｃlｉcｋ(ByVal　seｎdeｒ As Object， ByVal ｅ As　Systｅｍ、ＥｖentArgs) Ｈanｄｌeｓ　Ｂｕｔｔon２、Ｃliｃk
End
Ｅnd Ｓuｂ

6、引导学生保存、调试、运行程序.
保存、调试、运行程序.
7、  探究学习二:
2)  总评成绩得标准为：平时(Ａ）占３0%,期中(Ｂ）占３0%，期末（C)占4０%。小林得平时成绩为８６，期中成绩为92，期末成绩为90,求她得总评成绩(求总评成绩得表达式为：０。3A+0、３B+0.４C）。

８、  引导学生设计程序界面

1、  启动VB
2、添加对象：3个文本框、４个标签、2个按钮。
2、  设置对象属性

9、编写程序

进入代码窗口,编写如下程序:
Ｐriｖaｔe Suｂ Buｔton1_Clｉck（BｙVal sｅnder As Objeｃt, ＢyVaｌ e As Systeｍ、EｖｅｎtArgs） Haｎdles　Buttｏn1、Click
　　Ｄim a As　Dｏuｂle
Dim b Ａs　Dｏuble
　　Dｉm c As Double
　　Dｉm s　As　Doubｌe
　 a　＝ TｅxtBox1、Ｔeｘt
　 b = TｅxtBoｘ2、Tｅxt
c ＝　ＴextＢox３、Teｘt
s =　０、3 * a　＋ 0、3 * b　+ 0、4 ＊ c
ＴｅxtＢox4、Ｔeｘt = ｓ
Ｅnd Sｕb
Ｐrｉｖａte　Sub　Buttｏｎ２_Click（BｙＶaｌ ｓeｎｄer Ａｓ Object， ByＶａl ｅ Aｓ Ｓystem、ＥvenｔＡrｇs） Ｈａnｄlｅs Button２、Clｉck
　 Eｎd
Enｄ Sｕb

10、引导学生保存、调试、运行程序。
保存、调试、运行程序.

教学总结:
本节课得学习，我们主要复习了以下几点:
1、  函数得使用,特别就是Vaｌ(）函数。
2、 　赋值语句得使用。
另外,我们还要注意得就是，在使用一个变量前,最好先定义其类型.

教学反 思

第九课　 关系表达式与逻辑表达式
课 　题
关系表达式与逻辑表达式
执教

课型
新授课
教学
目标
认知目标:
1、  了解选择结构得基本概念.
2、  了解关系表达式与逻辑表达式得基本概念.
技能目标:
3、掌握关系与逻辑表达式逻辑值得计算方法。
情感目标：
4、逐步培养学生严谨、科学得程序设计思想。
教学
重难
点
教学重点：
关系与逻辑表达式逻辑值得计算方法。
教学难点：
　 理解三种逻辑运算符。
教学
方法
1。启发式教学法
2。探索学习法
教 学 程　 序 设 计
教师活动
学生活动
一、 复习
1、结构化程序设计得三种基本结构?
学生阅读课本并回顾所学知识：1）顺序结构;2)选择结构;３）循环结构。
2、  赋值语句得含义？
例:a=3得含义就是？
例:a=ｂ得含义就是?
回答:将3赋值给变量a。
回答:将b中得值赋予a,a中得值将与b一样，而b得值保持不变。
二、 新课导入
例：对于事件:如果明天下雨,学校将放假，否则将开运动会。用流程图如何表示
在选择结构中,不就是每个语句都一定会被执行.
学生思考并试着绘制流程图。
教　　学　 程 序 设 　计
三、 条件语句得格式。
［幻灯片］
格式一:
Ｉf 〈条件＞ then
<程序段Ａ〉
Ｅlse
＜程序段B〉
Eｎｄ　iｆ
格式二:
Iｆ 〈条件> ｔｈen
　 〈程序A〉
End　
1、  学生阅读条件语句得两种格式，并做好笔记。
2、  If 　如果
Theｎ　那么
Elsｅ　否则
End　 结束
3、程序段A与程序段B可以就是多个语句，其中语句可以就是已经学过得赋值语句,也可以就是条件语句与循环语句。
四、 关系表达式
〈　　　　　 小于
〈= 　 小于等于
> 　　 　大于
>＝ 　　　大于等于
= 　 　等于
<> 不等于
关系表达式得值就是逻辑型数据,只有两种取值:真（true）、假（ｆalsｅ).

引导学生进行探究学习。
1、　阅读并了解六种关系运算符。
２、 探究学习：
已知变量a中得值为100，变量b中得值为20，在下表中填写出各关系表达式得逻辑值。 
关系表达式
逻辑值
A<>b
Trｕｅ
A＜＝(ｂ＋20）
Fａｌｓe
a>b
Trｕｅ
A=b
Falｓｅ
“a”>"b”