当前位置:首页 >> 其它课程 >> 初二信息技术(下)VB程序设计全教案

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


第一课
课 题 算法 执教

算法
课型 新授课

教 学 目 标

认知目标: 1.了解程序设计的一般过程; 2.了解算法的基本概念,学会用自然语言描述简单的算法。 能力目标: 3.提高学生学习程序设计的积极性。 4.培养学生分析问题、解决问题的能力。 情感目标: 5.培养学生爱科学,爱祖国的思想情

感。 教学重点: 算法的概念,算法在程序设计中的地位以及算法的描述。 1.启发式教学法 2.探索学习法 3.多媒体辅助教学 教师活动 一、 新课导入 请学生阅读课本,并回答 下面问题: 1、 程序设计的一般过程 是怎样的? 2、 什么叫算法? 学生活动 1、学生阅读课本。 2、回答问题: 程序设计的过程为: 首先对要解决的问题进行分析; 再拟定一套解决问题的方法与步骤; 最后选用一种计算机语言来描述具体的步骤。 算法:用来解决问题的方法和步骤。 媒体 应用 设计意 图

教 学 重 难 点 教 学 方 手 法 段

教 学 程 序 设 计

二、 算法的描述: [举例讲解]:求底边 a 为 3 厘米, h 为 2.5 厘米的三 高 角形面积。 请学生回答解决该问题的 算法。 [练习]: 己知圆的半径, 求 圆的面积。 请学生设计算法,用自然 语言描述。 [提出问题]:有 1000 位同 学的姓名与电话号码的通 讯表,现要求编写程序:当 输入某同学的姓名,计算机 立刻显示该同学的电话号 码。

学生阅读课本并回答: 1、将 3 输入计算机; 2、将 2.5 输入计算机;

3、计算机

的值;

4、输出计算机; 学生讨论、探究: 1、输入圆的半径; 2、计算圆的面积; 3、输出圆的面积。 [讨论]:分组进行讨论、交流。 [结论]查找可以有多种方法: 方法 1、从第 1 位同学开始按顺序查找。 方法 2、以姓名为关键字进行排序,再采用“二分法” 查找。 1、 对通讯表以姓名为关键字进行升序排序; 2、 从通讯表的中点行开始检索,判断是否与该同 学的信息相符。 如果相符, 则显示该同学的电话号码, 并结束程序; 3、 当信息不相符时,如果表的中点行的同学姓名 要比所找的同学姓名大,则放弃中点行的下半部分, 返回到上半部分的中点行继续进行检索;如果表的中 点行的同学姓名要比所找同学姓名小,那么放弃中点 行的上部分,返回到下半部分的中点行继续进行检 索…… [结论]:算法是解决问题的方法和步骤。 [结论]:要 1000 次。 [讨论]:分组进行讨论、交流。 [结论]:要 10 次。 [结论]:算法的优劣直接影响所编程序的质量,算法 是程序的灵魂。 [探究]:对于“张三对李四说他的孩子考上了大学” 这句话,思考:谁的儿子考上了大学。

[提出问题]: 如果查找的同 学正好在最后一个,用方 法 1 要查找几次?

[引出]:用流程图描述算 法。 教 学 反 思

[结论]:用自然语言描述算法,有时会产生歧义。

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

面向对象程序设计
执教 课型 新授课

教 学 目 标

认知目标: 1.了解面向对象程序设计的基本思想。 2.认识对象的属性,掌握几个常用的属性。 3.认识对象的事件,事件过程,掌握几个常用的事件。 技能目标: 4.掌握面向对象编程的基本方法。 情感目标: 5.感悟面向对象程序设计的优越性,激发学生的学习兴趣。 教学重点: 对象的属性、事件和方法。 教学难点: 常用事件及事件过程。

教 学 重 难 点 教 教 学 学 方 手 法 段

1.启发式教学法 2.探索学习法 3.网络广播交互式 4.多媒体辅助教学

教师活动

学生活动 学生回顾并回答: Form1 Command1 Command2 Label1 Label2 Text1 Text2 总共 7 个对象。 学生阅读课本,并回答: 对象的三要素:属性、事件、方法。

教 学 程 序 设 计

1、 回顾并导入新课 [提问]:在上节课编写的“求正 弦函数值”程序中,总共用到了 多少个对象? 2、 新授 指导学生阅读课本。 1)对象的三要素 [提问]对象的三要素是什么?

2)属性 学生阅读课本,并回答: 属性决定了对象的具体特征。例 属性 属性说明 如,对象的大小、位置、颜色以 Name 对象的名称,用于程序代码中 及对象中显示的文字等。 引用该对象。 [提问]请问对象的 10 个常用属性 Caption 是什么?并说它们的作用。 决定对象中显示的文字 Enabled 设置对象的属性有两方法:①在 属性窗口中直接设置;②在程序 中利用属性赋值语句对其设置。 [提 问 ]请 同 学 用 第 一 种 方 法 将 form1 对象的 caption 属性设置为 “好好学习” ,用第二种方法将 form1 对象的 caption 属性设置为 “天天向上” 。 Visible Height Width Left/Top ForeColor BackColor Font 3)事件 请学生分两种属性设置方法在效 果上的区别。 小结:刚才我们所说单击即是事 件。在 Windows 中,程序的运行 就是靠事件来驱动的。 因此我们在书写程序时,必须指 明该程序通过哪个对象的哪种事 件来激发。 决定是否允许对对象操作 决定程序运行时对象是否可见 决定对象的高 决定对象的宽 决定对象在屏幕或窗体内的位 置 决定对象的前景色(即正文颜 色) 决定对象的背景颜色 决定显示文字的字体、字号、 字型等。

1、回顾上节课的 练习,并实践。 2、讨论、协作。 3、一学生演示。

教 学 程 序 设 计

学生讨论分析 区别: 直接在属性窗口中设置的属性值, 在窗口打开后能立即看到; 而利用属性赋值语句设置的属性值,需要单击按钮后才会生效。 识记几种常用事件及其对应的英文书写: 单击:Click 双击:DblClick 按下鼠标键:MouseDown 移动鼠标:MouseMove 按下键盘键:KeyPress 启动窗体:Load 1、 设计窗口界面 2、 设置各对象属性,如下表所示: 对象名 Form1 属性 Caption BackColor font 属性值 显示文字 Green 隶书,小一

教 学 程 序 设 计

3、 引导学生探究学习

Form1 Label1

任务:编写如下图所示的程序: Command1 caption 开始 窗体为绿色,单击“开始”按钮, 窗体上显示 “面向对象程序设计” 3、 添加事件处理程序: (字号为小 1 号,字体为隶书) Private Sub Button1_Click(ByVal sender As Object, ByVal e As ; 双击窗体,结束程序。 System.EventArgs) Handles Button1.Click Label1.Text = "面向对象程序设计" End Sub Private Sub Form1_DoubleClick(ByVal sender As Object, ByVal e As

System.EventArgs) Handles Me.DoubleClick End End Sub 4、保存程序 5、调试、运行程序。 小 结 本节课我们学习了 1.面向对象程序设计的基本思想。 2.对象的属性,掌握几个常用的属性。 3.对象的事件,事件过程,掌握几个常用的事件。

教 学 反 思

第三课
课 题 教 学 目 标 教 学 内 容 教 教 学 学 方 手 法 段 编写“别碰我”程序 执教:

编写别碰我程序
课型 实践课

认知目标: 1、了解面向对象程序设计的基本思想。 技能目标: 2、掌握用面向对象程序设计的基本思想编写程序。 情感目标: 3、培养学生的编程能力。 教学重点: 理解对象及事件。 教学难点: 巧妙的选择对象与事件。

1.启发式教学法 2.探索学习法 3.多媒体辅助教学 4.任务驱动式教学

教师活动

学生活动

1、 师生共同体验“别碰我”程序的功能,并明确学习任务。 1) 运行“别碰我”程序,如下图所示: 教 学 程 序 设 计 2)当鼠标指针移动到“对象编程”文字后,文字切换显示为“别碰我” 。当鼠标指针离开文字“别碰 我”后,文字又恢复为“对象编程” 。 3)单击文字“别碰我” ,窗口左侧出现一个圆。 4)双击文字“别碰我” ,画出的圆消失。 5)单击窗体的其它区域,结束程序。

分析程序界面组成,并填写如下表: 对象名 Form1 对象类型 窗体 作用 在上面加载对象组成程序 界面 用来显示文字 用来承载鼠标离开 Label1 对象事件。

Label1 Image1

标签 图象

1、分组讨论、分析任务中所涉及到的对象与事件。 2、将分析结果写入下表: 2、引导学生 分析程序界 面组成。 对象名 Form1 Label1 Label1 Label1 3、引导学生 分析任务 2 到 5 步所涉 及到的对象 与事件。 Image1 事件 Click 事件过程功能 关闭窗口

MouseMove 显示“别碰我” Click DblClick mousemove 画圆 清除圆 显示“对象编程”

4、引导学生 输入程序。

学生进入代码窗口,先选择对象与事件,然后输入对应的程序段。 Private Sub Label1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.Click Me.CreateGraphics().DrawEllipse(Pens.Black, 20, 20, 100, 100) End Sub Private Sub Label1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.DoubleClick Me.CreateGraphics().Clear(Me. BackColor) End Sub Private Sub Label1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Label1.MouseMove Label1.Text = "别碰我" End Sub Private Sub PictureBox1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseMove Label1.Text = "对象编程" End Sub Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click End End Sub

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

第四课 顺序结构
课 题 教 学 目 标 顺序结构 执教 课型 新授课

认知目标: 了解顺序结构的基本概念; 技能目标: 掌握程序的基本结构 情感目标: 在学习编写 VB 程序的过程中,建立模块结构化编程思想,养成正确的程序设计习惯。 教学重点: 掌握程序的基本结构 教学难点: 程序的三个组成部分:输入,处理,输出。 教师活动 1、 新课导入 为了保证程序的可读性、可靠性、可维护 性,我们必须按一定的规则进行程序设计。 2、三种基本逻辑结构 [提问]: 结构化程序设计的三种基本逻辑结 构是什么? 学生活动 阅读课本,并回答问题: 结构化程序设计的三种基本逻辑结构是: 顺序结构; 选择结构; 循环结构。

教 学 重 点

教 学 程 序 设 计

3、 顺序结构。 从上往下,顺序执行。 [实践]:用编程的方法求一元二次方程的 解。 (a≠0) 当 时,

了解实践任务。

4、 分析任务 1) 输入:一元二次方程的 3 个系数; 2) 计算:方程的二个解。 3) 输出:方程的二个解。

5、 程序界面分析

分析程序界面,并完成下表 对象名 Form1 Text1 Text2 Text3 Text4 Text5 控件名 作用 窗体 在上面加载对象 组成程序界面

文本框 输入系数 A 文本框 输入系数 B 文本框 输入系数 C 文本框 输出解 X1 文本框 输出解 X2 计算方程的解 结束程序 显示“X 显示 2 显示 X+ 显示=0 显示 X1= 显示 X2= +”

6、建立应用程序界面

Command1按钮 Command2按钮 Label1 Label2 Label3 Label4 Label5 Label6 标签 标签 标签 标签 标签 标签

1、启动 VB; 2、添加对象; 3、修改对象属性; 4、完成下面练习: 通过设置窗体对象的 caption 属性,使得标题栏显示文 字“一元二次方程” ; 要使得文本框对象中的内容为空,应设置 text 属性; 通过设置命令按钮对象的 caption 属性,使得按钮中显 示开始; 通过设置 label1 对象的 caption 属性,使其显示 X +; 要改变对象中的文字大小, 可以设置有关对象的 font 属 性。

教 学 程 序 设 计

7、在两个命令按钮对象中分别输入相应的 程序段。

1、进入代码窗口; 2、输入下面代码: Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a As Double Dim b As Double

Dim c As Double Dim x1 As Double Dim x2 As Double a = TextBox1.Text b = TextBox2.Text c = TextBox3.Text x1 = (-b - Math.Sqrt(b * b - 4 * a * c)) / (2 * a) x2 = (-b + Math.Sqrt(b * b - 4 * a * c)) / (2 * a) TextBox4.Text = x1 TextBox5.Text = x2 End Sub Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click End End Sub 8、保存、调试、运行程序。 保存位置:我的文档 文件名:自己姓名 9、练习与思考 1)在程序中,通过什么对象进行数据的输 入输出? 2)分别将 3 个系数赋给哪些变量? 小 结 教 学 反 思 保存、调试、运行程序

1)进行数据输入的对象有:text1 text2 进行数据输出的对象有:text4 text5 2)3 个系数分别赋给了 a,b,c 三个变量。 1、了解顺序结构的基本概念; 2、掌握程序的基本结构(输入-计算-输出)

text3

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

常量变量函数表达式
执教 课型 新授课

教 学 目标

认知目标 了解常量、变量、函数等概念。 技能目标 掌握常用函数的使用方法。 掌握 VB 表达式的书写方法。 情感目标 在学习编写 VB 程序的过程中,建立模块结构化编程思想,养成正确的程序设计习惯。 教学重点 1、常量、变量、函数的概念 2、函数使用方法。 3、VB 表达式的书写方法。 教学难点 字符运算&与+的不同用法。 启发式教学法 探索学习法 网络广播交互式 多媒体辅助教学 教师活动 新课导入 在 VB 程序设计中,经 常会用到很多符号,如 用 r 表示圆的半径, 回顾所学知识。 3.1416 表示圆周率。 其中 3.1416 与 r 就是我 们这节课要学习的常量 与变量。 常量 [提问]: 常量的定义是什 么? [提问]: 常量的类型有哪 些? 阅读课本,并回答问题: 常量是指在程序运行过程中保持不变的量。 常量的类型有: 整型:integer 长整型:long 单精度:single 双精度:double 逻辑型:Boolean 字符串型:string 日期型:Date 3、被一对双引号括起来的文字与符号称为字符型常量。 学生活动

教 学 重 难 点

教 学 方法

教 学 程 序 设 计

[提问]: 字符型常量有什 么特点?

变量 [提问]: 变量的定义是什 么? [提问]: 变量名的命名原 则是什么? 函数 [提问]: 函数的定义及特 征? 引导学生阅读几个常用 函数的功能。

阅读课本,并回答问题: 在程序的运行过程中,值会发生变化的量称为变量。 变量名的命名原则: 变量名必须以字母或汉字开头,由字母、数字、汉字及下划线组成。变 量名不能与 VB 中的保留字同名。 阅读课本,并回答问题: 函数实际上是一段用来完成某种特定运算或功能的程序。 一般情况下,函数只能返回一个函数值。 函数 Abs(x) Int(x) Sqr(x) Rnd(x) Val(x) Str(x) 函数的功能 X 的绝对值 取不大于 X 的最大整数 X 的平方根值 产生[0,1]的随机数。 将字符型数据转换为数值数据 将数值数据转换为字符型数据 值类型

探究学习 写出下列函数的函数值。 引导学生进行探究学 习。 函数 Abs(86) Abs(-86) Int(8.001) Int(8.999) Int(-8.999) Sqr(64) 5、表达式 [提问] :表达式的分 类? 指导学生阅读课本: *乘法,不能省略; /除法,不能写成分数 形式,必须写在一行内。 ^幂运算,不能省略,也 必须写在一行内。 函数值 86 86 8 8 -9 8

阅读课本,并回答问题: 表达式可分为:算术表达式、字符表达式、关系表达式、逻辑表达式。 阅读并了解算术运算符与字符运算符。 探究学习: 根据下面的描述,在表格中填写算术表达式。 描述 已知正方形边A,求面积。 变量A除以变量A和变量C的差 求两位数X中的十位数。 连接两个字符型变量 m,n 的值。 表达式 A^2 a/(a-c) Int(x/10) M+n

变量X与变量Y之差的绝对值加上 68 Abs(x-y)+68

小结

学习本节课后,着重要掌握的有: 掌握常用函数的使用方法。 掌握 VB 表达式的书写方法。

反思

第六课
课 题 常用语句 执教

常用语句
课型 新授课

教 学 目标

认知目标: 1、了解一般赋值语句与属性赋语句的含义与作用。 技能目标: 2、掌握赋值语句,并能正确运用到所编写的程序中。 3、能够在程序中正确使用 End 和 Rem 语句。 情感目标: 4、逐步培养学生正确的程序设计习惯。 1、赋值语句。 2、属性赋值语句。 1.讲解与讨论 2.实验与探究 教师活动 一、 情境导入 (提问)前面我们探讨了“解一元二次 方程”的程序,请问程序中哪一条语句 算出了方程的根? (演示) (讨论)同学们是如何理解上面两条语句 的? 二、 导入新课 三、 新课讲授 1、赋值语句 (讲述) 赋值语句有两个功能: ①运算---算出右边表达式的值; ②赋值----将右边表达式的值赋给左边的 变量。 学生活动 回答: X1=(-b+Sqr(b*b-4*a*c))/(2*a) X2=(-b-Sqr(b*b-4*a*c))/(2*a) 学生讨论、回答。 (讨论) 赋值语句中的赋值号两边的内容的位置可以互换 吗? (实验与探究) 进入 VB 代码窗口,分别输入: A=2 2=a 当输入第二条语句时,就会出现错误信息。 (结论)赋值号左边是变量,右边是数值,是将右边的 数值赋给左边的变量。 (讨论) (实验与探究) 在 VB 中运行如下程序: X=1 X=2 Print x 得到变量 X 的值为 2 (结论)如果变量中原来有数值,当赋予新的数值后,新的 数值将替代原来的数值。

教学 重点 教学 方法

教 学 程 序 设 计

(演示) X=1 X=2 (提问)执行完两条语句后, 变量 x 中的值 是多少?

(演示) X=1 y=x (提问)执行完两条语句后, 变量 x 中的值 是多少?

(讨论) (实验与探究) 在 VB 中运行如下程序: X=1 y=x Print x 得到变量 X 的值为 1 (结论)将一个变量的值赋给另一个变量时,只是将这个变 量中的数值复制到另一个变量中。

2、属性赋值语句 对象的属性可以在属性窗口设置,也可 以利用属性赋值语句在程序中进行设 置。 对象.属性名=表达式

(实验与探究) 在 VB 中运行以下程序段: Form1.caption=”解一元二次方程” Command1.caption=”你好” (实验与探究)

引导学生完成练习。

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

2、观察下面的程序段,填写各变量中的值。

小结

赋值语句有两个功能: ①运算----算出右边表达式的值; ②赋值----将右边表达式的值赋给左边的变量。

反思

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

赋值语句(二)
课型 实践课

教学目 标

认知目标: 1、理解一般赋值语句与属性赋语句的含义与作用。 ; 技能目标: 2、掌握赋值语句,并能正确运用到所编写的程序中。 情感目标: 3、逐步培养学生正确的程序设计习惯。 教学重点: 理解一般赋值语句与属性赋语句的含义与作用 教学难点: 掌握赋值语句,并能正确运用到所编写的程序中

教 学 内 容 教 学 方 法 教 学 手 段

启发式教学法 探索学习法 网络广播交互式 多媒体辅助教学 教师活动 复习 [提问]:赋值语句有什么作用? 学生活动 回顾有关赋值语句的学习,并回答: 传递数据 计算表达式的值 赋值语句在传递数据时,是从右往左传。 对于 a=b,是将 b 的值传递给 a,被改变的是 a 的值。

教 学 程 序 设 计

[提问]:赋值语句在传递数据时,方 向是怎样的?例如: a=b, 是将谁的值 传递给谁? 师生共同体验“交换两个数”程序

输入两个数,分别赋值给两个变量 a,b 单击交换按钮,交换 a,b 两个数后重新显示。 1、启动 VB 2、添加对象: 5 个标签:label1, label2, label3, label4,label5. 4 个文本框:text1, text2, text3, text4. 2 个按钮:command1,command2. 设置对象属性:

教 学 程 序 设 计

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

对象名 Form1 Label1 Label2 Label3 Label4 Label5 Text1 Text2 Text3 Text4 Command1 Command2 引导学生编写程序 [提示]: 交换 a,b 两个数的程序 为: T=a A=b B=t

属性 caption Caption Caption Caption Caption Caption Text Text Text text Caption Caption

属性值 交换两个数 A: B: 交换后的两个数 A: B: 清空 清空 清空 清空 交换 结束

编写程序: Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a As Double Dim b As Double Dim t As Double a = TextBox1.Text b = TextBox2.Text t=a a=b b=t TextBox3.Text = a TextBox4.Text = b End Sub Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click End End Sub

5、引导学生保存、调试、 保存、调试、运行程序。 运行程序。 小结: 通过本节课的学习,要掌握以下两点: 1、理解一般赋值语句与属性赋语句的含义与作用。 ; 2、掌握赋值语句,并能正确运用到所编写的程序中,特别是如何使用赋值语句交换两个变量的 值。 教 学 反 思

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

函数与赋值语句
执教 课型 实践课

教 学 目标

认知目标: 了解一般赋值语句与属性赋语句的含义与作用。 掌握常用函数的使用方法。 技能目标: 掌握赋值语句,并能正确运用到所编写的程序中。 情感目标: 增强学生的审美能力,提高学生的协作学习兴趣。 教学重点: 掌握常用函数的使用方法。 教学难点: 掌握赋值语句,并能正确运用到所编写的程序中。 1.启发式教学法 2.探索学习法 3.网络广播交互式 4.多媒体辅助教学 教师活动 1、复习导入 使用函数能轻松解决一些复杂问题。 [提问]:前面我们学习了 6 个常用函数。请大家 说一说这 6 个函数的功能。 学生活动 回顾有关函数知识,回答: Abs(x): X 的绝对值 Int(x):取不大于 X 的最大整数 Sqr(x):X 的平方根值 Rnd(x):产生[0,1]的随机数。 Val(x):将字符型数据转换为数值数据 Str(x):将数值数据转换为字符型数据

教 学 内 容 教 学 方 手 法 段

2、明确实践任务。 编写顺序结构程序: 1) 已知电阻 R1 的阻值为 16Ω ,电阻 R2 的阻 值为 29Ω ,求两电阻的并联阻值。 (求并联阻值 的表达式为:R1R2/(R1+R2)). 3、引导学生分析程序组成。 [提问]:程序的输入输出各有几个? [提问]:在程序中,文本框的个数应有多少个?

程序的输入有两个: 与 R2 的阻值; R1 程序 的输出有一个:并联后的阻值。 在程序中,应有 3 个文本框。 1、 启动 VB 2、 添加对象:3 个文本框、3 个标签、2

教 学

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

程 序 设 计

个按钮。 3、 设置对象属性

进入代码窗口,编写如下程序: Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim r1 As Double Dim r2 As Double Dim r As Double 因为如不事先声明,VB 会将 R1,R2 视为字符类 r1 = TextBox1.Text 型变量。在计算(R1+R2)时,会将 R1 与 R2 的 r2 = TextBox2.Text 值直接拼接。如 R1 为 16,R2 为 29,计算 R1+R2 r = r1 * r2 / (r1 + r2) 的值将为 1629,而不是 45。 TextBox3.Text = r 改进的方法有两种,第一种就是事先将 R1、R2、 End Sub R 声明为 Double 型。第二种是使用 Val()函数,将 Private Sub Button2_Click(ByVal R1 与 R2 强制转换为数值型。 (R1+R2)将变为 sender As Object, ByVal e As (val(R1)+val(R2))。 System.EventArgs) Handles Button2.Click End End Sub 5、编写程序 [提示]: 请使用变量声明语句, 事先声明 3 个变量 R1、 R2、 R,并将其类型声明为 Double。否则程序将运行 出错。 6、引导学生保存、调试、运行程序。 7、 探究学习二: 2) 总评成绩的标准为:平时(A)占 30%, 期中(B)占 30%,期末(C)占 40%。小林 的平时成绩为 86,期中成绩为 92,期末成绩 为 90,求他的总评成绩(求总评成绩的表达 式为:0.3A+0.3B+0.4C) 。 8、 引导学生设计程序界面 1、 启动 VB 2、添加对象:3 个文本框、4 个标签、2 个按 钮。 2、 设置对象属性 保存、调试、运行程序。

9、编写程序

进入代码窗口,编写如下程序: Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a As Double Dim b As Double Dim c As Double Dim s As Double a = TextBox1.Text b = TextBox2.Text c = TextBox3.Text s = 0.3 * a + 0.3 * b + 0.4 * c TextBox4.Text = s End Sub Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click End End Sub 保存、调试、运行程序。

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

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

第九课
课 题

关系表达式与逻辑表达式
执教 课型 新授课

关系表达式与逻辑表达式

认知目标: 1、 了解选择结构的基本概念。 2、 了解关系表达式与逻辑表达式的基本概念。 教学 技能目标: 目标 3、掌握关系与逻辑表达式逻辑值的计算方法。 情感目标: 4、逐步培养学生严谨、科学的程序设计思想。 教学重点: 教学 关系与逻辑表达式逻辑值的计算方法。 重难 教学难点: 点 理解三种逻辑运算符。 教学 1.启发式教学法 方法 2.探索学习法 教师活动 一、 复习 1、结构化程序设计的三种基本结构? 2、 赋值语句的含义? 学 例:a=3 的含义是? 序 例:a=b 的含义是? 计 二、 新课导入 例:对于事件:如果明天下雨, 学校将放假, 否则将开运动会。 用流程图如何表示 在选择结构中,不是每个语句 都一定会被执行。 三、 条件语句的格式。 [幻灯片] 格式一: If <条件> then <程序段 A> 学 Else 序 <程序段 B> 计 End if 格式二: If <条件> then <程序 A> End 学生活动 学生阅读课本并回顾所学知识: 顺 1) 序结构;2)选择结构;3)循环结构。 回答:将 3 赋值给变量 a。 回答:将 b 中的值赋予 a,a 中的值将 和 b 一样,而 b 的值保持不变。 学生思考并试着绘制流程图。

教 程 设

教 程 设

1、 学生阅读条件语句的两种格式,并做好 笔记。 2、 If 如果 Then 那么 Else 否则 End 结束 3、 程序段 A 与程序段 B 可以是多个语句, 其 中语句可以是已经学过的赋值语句,也可以 是条件语句与循环语句。

四、 关系表达式 1、 阅读并了解六种关系运算符。 < 小于 2、 探究学习: <= 小于等于 已知变量 a 中的值为 100,变量 b 中的值为 20,在下表中 > 大于 填写出各关系表达式的逻辑值。 >= 大于等于 关系表达式 逻辑值 = 等于 A<>b True <> 不等于 A<=(b+20) False 关系表达式的值是逻辑型数据,只有两种取 a>b True 值:真(true)、假(false)。 A=b 引导学生进行探究学习。 五、 逻辑表达式 三种逻辑运算符: 逻辑运算符 and Or not “a”>”b” “a”<>”b” False False True

1、 阅读课本 2.2 逻辑表达式,了解 三种逻辑运算符。 2、 探究学习: 功能 逻辑运算符连接的两个表达式同时为“真” 已知变量 a 中的值为 100,变量 b 的 值为 20, 在下表中填写出逻辑表达式 时,则逻辑表达式的值为“真” 。 两边的表达式只要一个为真,则整个表达式 的逻辑值。 的值为真。 将后面的表达式的值取反。 逻辑表达式 a>200 and b=20 a>=100 and b>10 A=b and b<10 a>200 or b=20 a>=100 or b>10 A=b or b<10 Not(a>200 and b=20) Not(a>200 or b=20) 逻辑值 False True False True True False True False

引导学生进行探究学习。

小结:1、选择结构的基本概念。2、关系表达式与逻辑表达 式的基本概念。 掌握关系与逻辑表达式逻辑值的计算方法。 回顾本节课学习要点。 3、 反思

第十课 选择结构
课题 教学 目标 选择结构 执教 课型 新授课 认知目标: 了解选择结构的基本概念。 理解计算机的逻辑判断是通过选择结构来完成的。 技能目标: 学会用 VB 中的条件语句实现选择控制结构。 情感目标: 逐步培养学生严谨、科学的程序设计思想。 教学重点: 学会用 VB 中的条件语句实现选择控制结构。 教学难点: 理解计算机的逻辑判断是通过选择结构来完成的。 启发式教学法 探索学习法 教师活动 复习。 上节课我们学习了条件语句的结构,以 及关系表达式与逻辑表达式。 回顾条件语句的结构; 回顾关系表达式与逻辑表达式。 学生活动 条件语句的格式。 格式一: If <条件> then <程序段 A> Else <程序段 B> End if 格式二: If <条件> then <程序 A> End 关系表达式与逻辑表达式 判断一个数是否被 10 整除的表达式为: X/10=int(X/10)

教 学 重 难 点 教 学 方法

教 学 程 序 设 计

2、师生共同体验“找较大数”程序的功能,并明确学习任务。 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 中的条件语句实现选择控制结构。

反思

第十一课
教学目标
一、知识与技能: 1、学会使用程序画一个带颜色的圆 2、学会使用程序同时画多个圆 3、学会循环语句的使用 4、能灵活运用循环语句 5、体会循环语句的意义 二、重点与难点 1、了解画圆的语句 2、了解循环语句的格式 3、能灵活使用循环语句 三、教学手段: 任务驱动、合作探究、屏幕演示 四、教学过程: 教学内容 教师活动

循环结构

学生活动

设计意图

引入

画一个圆可以 使用哪些软件?可 以用画图,老师展 示, 但我们学习了 vb 以后我们完全可以 使用程序来画圆。教 师展示画圆程序。

观看作品,了解 vb 也可以用于画圆

创设情景,让学 生对本节课产生兴 趣,调动学生的积极 性。

程序界面的制作

打开一个新的文 档,制作两个按钮, 名称分别是确定和 退出,

学生根据学件布置的 任务完成任务一

制作程序的界面 是 vb 编写应用程序 的第一步。

画圆程序的编写

教师布置任务, 学生根据课件自 强调程序段的位置, 学完成完成任务二。 避免程序在写的过 程中出错。 教师提问,如果一次 要多画几个圆怎么 办? 请学生按照任务三 学生根据课件自行 完成。

让学生通过自己 的努力看到效果,增 加学生的成就感。

画多个圆

巩固画圆程序, 为循环语句的使用 打下基础。

完成画 5 个圆。

循环程序

教师提问:如果 我需要画 100 个圆怎 么办? 那么可以使用 我们的循环语句来 完成。 老师讲解循环 语句的构成,用通俗 的语言让学生读懂 循环结构的含义,然 后请学生完成任务 四。

学生学习循环语 句的使用,理解循环 语句。

自主学习和探究 学习相结合。巩固学 生对循环语句的理 解。

探索循环程序

教师提问,请学生 学生探究循环次数 读任务五,完成任务 的计算。 五的提问,老师总 结,用终值减初始除 以步长加 1 就是循环 的次数。 总结本课内容,可以 请学生自评和教师 评价相结合。 让学 生进一步巩固循环 语句的使用。

学生探索学习, 理解循环语句次数 的计算。

总结

再次回顾知识点

让学生巩固知识点

五、教学反思
本节课是 vb 学习的第 3 节, 学生在前面的学习中已经具有了一定的基础知识, vb 已经 对

有了初步的了解,为这个课的进行创造了条件。教学目标确定合理,通过一节课的学习,从 任务的完成情况来看,达到了教学目标的要求,关键点是在对循环语句的理解和运用上面, 通过让学生分析程序,基本达到了理解的目的。整节课的教学流程上看,学生能按照学件的 要求,结合老师的讲解,层层递进地学习,并给以适当的探索空间,既完成了任务,又理解 了知识点。本节课主要采取自主学习的方式,辅以学生之间合作和探索,老师与学生,学生 与学生之间的评价,让学生在学习中既锻炼了操作,又获得了能力的提高。应该说较好地完 成了教学目标。不足的是,由于时间的限制,学生虽然能理解循环的意义,但是在循环语句 的具体操作与判断方便缺乏灵活性,如果让学生自行编写程序,可能存在一定的困难,这都 需要在后续的课程中继续训练与操作。

第十二课
一、教学目标 1、 知识目标

VB 中的定时器控件

(1)理解定时器常用属性 interval 和 Enabled 的意义和设置 (2)理解定时器的 timer 事件 2、技能目标 (1)根据程序要求熟练设置定时器控件的属性; (2)熟练运用语句格式设置计时器的属性; (3)能模仿编写程序实现定时器的应用。 二、教学重点 1、定时器控件的 interval 属性 2、定时器控件中的 timer 事件 三、教学难点 定时器每隔一段时间,由系统自动产生一个计时信号,激活定时器的 Timer 事件, 学生对定时器这一功能的理解是本节课的一个难点。学生突破模仿,能迁移运用定时 器编写相关的程序是本节课的又一个难点。

四、教学方法
讲授法、演示法、小组讨论、上机练习

五、教学模式
“示范—模仿”教学模式

六、教学过程
教学环节 创设情境、 教师活动 演示“倒计时”程序 学生活动 观看教师演示, 设计意图 激发学生的兴

激趣导入 讲授:定时器 一、属性 1. Name 默认名称:timer 2. Enabled 可用性 3. interval 时间间隔,单位:ms,1000ms=1s 值:0 不响应 timer 事件 值:1~65535 二、事件 Timer 三、功能 每 间隔 一段 时间 ,触 发一 次定 时器 的 timer 事件 演示:例 4-7: 设计时钟 属性设置 Label1.BackColor = #000000 Label1.Font = 36 Form1.Caption = "时钟" timer1.Interval = 1000 编写代码 Private Sub Timer1_Timer() Label1.Caption = Time End Sub 小结: (1)time 与 time$的区别 (2)Interval 设置很重要

产生兴趣

趣,引起学习 动机 让学生先模 仿,参与学习。

参与学习,与教 师互动

示范建构、 积极引导

模仿教师的演 示,进行练习

反思自已的学 习,与教师互动 学生自主学 习,巩固知识

自主模仿, 合作交流

布置任务 1: 学生小组讨论, 给上述程序增加两个按钮:启动、退出。 解决任务 (提示) Enabled 属性的使用 布置任务 2: “树”字号变大 (提示)字号的属性是 Fontsize 教师演示: “元旦倒计时”程序 (教师将程序的 exe 文件发给每台学生 机) 组织学生一起总结本节课的学习收获 学生观看演示, 积极构思,为倒 计时程序的制作 做好准备 大胆谈想法,总 结收获

应用新知, 迁移训练

提升学生对知 识的理解水平

总结提 升,巩 固成果 教学反 思

总结知识,展 示自已

第十三课 滚动条控件

一、 演示课件(调色板.exe) 二:了解光的三原色:红,绿,蓝;
人眼所见的各种色彩是因为光线有不同波长所造成的,经过实验发现,人类肉眼对其中三种波长的 感受特别强烈,只要适当调整这三种光线的强度,就可以让人类感受到『几乎』所有的颜色这三个颜色称 为光的三原色(RGB),就是红(red),绿(green),蓝(blue)。所有的彩色电视机、屏幕都具备产生这三种 基本光线的发光装置。因为这三种光线的混合几乎可以表示出所有的颜色,因此计算机里头就用 RGB 三个 数值的大小来标示颜色,每个颜色用 8bit 来记录,可以有 0~255,共 256 种亮度的变化,三种乘起来就有 一千六百多万种变化,这也是我们常听到的 24 bit 全彩。

颜色范围:0~255 之间 猜一猜,下列颜色将组成什么颜色: 例: 红:0 红: 255 红:255 绿:0 蓝:0

绿:255 蓝:255 绿:0 蓝:0

三、介绍滚动条控件
滚动条控件重要属性:Min :最小值

Max : 最大值 Value: 当前值

四、设置调色板程序界面

五、编程:
1、编写一个子程序 color:几个事件都调用的程序可以写成子程序,三个滚动条都要调用子程序。

语句原理 r=Hscroll1.value 将滚动条一的当前值传给变量 r g=?? b=?? Text1.backcolor=RGB(r,g,b) RGB 函数,将 r,g,b 的值组合出各种颜色赋值给 text1 的背景色。 2、调用子程序: 在每一个滚动条的 change 事件中加入 color 语句

六、修改程序:

1、发现并修正错误

2、滚动条滚动时显示 r,g,b 的值

3、美化程序:可以改变窗体的背景

五、交作业

生成可执行文件“调色板.exe”,并提交作业。


更多相关文档:

初二信息技术《程序设计》教案

初二信息技术程序设计教案_其它课程_初中教育_教育专区。苏教版 ...(3)了解程序设计语言的三种类型 (4)掌握 VB 环境下编写程序的一般步骤 2....

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

初二信息技术(下)VB程序设计全教案_其它课程_初中教育_教育专区。初二(下)VB程序设计全教案 只为方便广大同行。第一课课 题 算法 执教 算法课型 新授课 教学目...

八年级信息技术《程序设计简介》教案 苏教版

八年级信息技术程序设计简介》教案 苏教版_其它课程_初中教育_教育专区。苏州...“进入 Basic”文件压缩 包并解压到桌面,双击文件夹中的“Progr am.vb p”...

八年级信息技术下册教案(南方版)

八年级信息技术下册教案科目 课时 课题 教学目标 信息技术 1 课时 第一课 年级...这节课我们就一起来认识一下 VB 程序设计语言,熟悉它是由哪些窗口组成,各个...

初二年级信息技术教案

并 进一步熟悉 VB 程序设计环境 课堂小结 知识回顾形成 作后 业记 板书设计 2009——2009 学年第一学期初二信息技术教案 第三周:2009.9.13—2009.9.19 课题...

初二信息技术《vb基本要素》教学设计

初二信息技术vb基本要素》教学设计_其它课程_初中教育_教育专区。《程序的基本...五、教学过程设计 1.教学内容的组织与呈现方式 本节课先以作文的组成为先行...

八年级下册信息技术教案

八年级下册信息技术教案本学期的主要内容是算法与 Vb 编程、巩固基础知识 第一...Label1.Caption=Timer1.Time 26、娟娟设计了如程序用来计算并输出 7×6×5...

苏教版八年级信息技术《VB程序的构成》教案

苏教版八年级信息技术VB程序的构成》教案_其它课程_初中教育_教育专区。苏教版八年级信息技术VB程序的构成》教案 重点:常量的类型、变量的命名、函数的格式、...

程序的数据(初二信息技术)

程序的数据(初二信息技术)_其它课程_初中教育_教育...《程序的数据》教学设计一、 教学内容分析《程序的...较复杂的 VB 程序,也可以解除 学生对程序设计的...

八年级下册信息技术教案(上海科教版)

八年级下册信息技术教案(上海科教版)_其它课程_初中...6.演示打开多个已有 Word 文档,不关闭的情况下,...可以融合 VB 进行开发作业 设计 创建一个 PPT 文档...
更多相关标签:
vb程序设计教案 | 初二体育教案 | 初二数学教案 | 初二体育课教案全集 | 初二音乐教案 | 初二美术教案 | 初二数学校本课程教案 | 初二英语教案人教版 |
网站地图

文档资料共享网 nexoncn.com copyright ©right 2010-2020。
文档资料共享网内容来自网络,如有侵犯请联系客服。email:zhit325@126.com