2022年VB程序设计教案 .pdf

《2022年VB程序设计教案 .pdf》由会员分享，可在线阅读，更多相关《2022年VB程序设计教案 .pdf（8页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、VB 程序设计选择结构教学目标1.知识与技能1.了解选择结构的基本概念。2.了解关系表达式与逻辑表达式的概念。3.能利用 VB 中的条件语句实现简单的选择结构。2.过程与方法经历实践、分析、归纳，掌握IF 语句的格式和功能。3.情感态度与价值观运用捉老鼠游戏， 完善程序， 发展学生思维的逻辑性及严谨的学习态度。4.行为与创新培养学生利用计算机的反馈作用进行探究学习的能力。课时安排安排 2 课时。教学重点与难点1.教学重点让学生学会使用 VB 语言的 If 分支语句，掌握分支判断程序结构， 来解决实际问题，并且培养学生的探索、创新能力。2.教学难点对解决问题的方法和步骤的理解，并能根据实际问题写

2、出程序代码。教学方法与手段精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 1 页，共 8 页 - - - - - - - - - - 讲述与讨论、实验与验证。课前准备教学课件、实例程序教学过程教学环节教师与学生活动设计意图设计情境、引入新课教师活动：让学生制作捉老鼠游戏学生活动：积极参与。教师活动：学生制作小游戏界面，教师指导，如果抓到小老鼠系统将会提示抓住老鼠了。一只小老鼠在草地上跑来跑去，现在要用鼠标控制敲钟它。敲中一次，就会弹出一次信息框。我们将通过制作这个小游戏程序，学习程序设计语言IF 条件判断

3、语句。由鼠标抓小老鼠同学们的不同选择引出本课的主题选择结构。通 过 制作 小 游戏 使 激发 学 生的 思 维能力，并引 出 本课 的 内容 选 择结构课堂小结小结总结本堂课的内容。拓展活动编写“小游戏”界面。培养学生的探索、创新能力。培 养 学生 的 创新， 探索能力精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 2 页，共 8 页 - - - - - - - - - - VB 程序设计选择结构教学目标1.知识与技能1.了解选择结构的基本概念。2.了解关系表达式与逻辑表达式的概念。3.能利用 VB 中的

4、条件语句实现简单的选择结构。2.过程与方法经历实践、分析、归纳，掌握IF 语句的格式和功能。3.情感态度与价值观运用捉老鼠游戏， 完善程序， 发展学生思维的逻辑性及严谨的学习态度。4.行为与创新培养学生利用计算机的反馈作用进行探究学习的能力。课时安排安排 2 课时。教学重点与难点1.教学重点让学生学会使用 VB 语言的 If 分支语句，掌握分支判断程序结构， 来解决实际问题，并且培养学生的探索、创新能力。2.教学难点对解决问题的方法和步骤的理解，并能根据实际问题写出程序代码。教学方法与手段精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - -

5、 - - - - - - -第 3 页，共 8 页 - - - - - - - - - - 讲述与讨论、实验与验证。课前准备教学课件、实例程序教学过程教学环节教师与学生活动设计意图设计情境、引入新课教师活动：让学生制作捉老鼠游戏学生活动：积极参与。教师活动：学生制作小游戏界面，教师指导，如果抓到小老鼠系统将会提示抓住老鼠了。一只小老鼠在草地上跑来跑去，现在要用鼠标控制敲钟它。敲中一次，就会弹出一次信息框。我们将通过制作这个小游戏程序，学习程序设计语言IF 条件判断语句。由鼠标抓小老鼠同学们的不同选择引出本课的主题选择结构。通过控件属性学生掌握本课界面设计由小游戏实例引出选择结构的一般流程图，讲

6、解选择结构与条件语句选择结构选择结构流程图新授教师活动：Timer 事件Private Sub Timer1_Timer() Randomize 随机化生成器X = Int(Rnd * 7000) X 值为随机整数,范围在 0-7000 Y = Int(Rnd * 4000) Y 值为随机整数,范围在 0-4000 通 过 制 作小 游 戏 使激 发 学 生的 思 维 能力，并引出本 课 的 内容 选 择 结构学 生 通 过教师讲解，精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 4 页，共 8 页 -

7、- - - - - - - - - 新授Image1.Left = X Image1 的左边界坐标为X Image1.Top = Y Image1 的上边界坐标为Y End Sub 理 解 控 件属性新授当定时器开始工作时，每到 Interval 设定的时间， 即执行一次代码。即产生 X和 Y 两个随机数，每一次时间间隔产生的随机数是不一样的。再将随机数赋予图片的左坐标和顶坐标。由此面产生的效果是：每到一定时间，老鼠图片的所在位置就随机发生变化。学 生 通 过老师讲解，理 解 选 择结 构 并 掌握 选 择 结构 的 基 本格式。新授2.停止按钮点击事件Private Sub Command2

8、_Click() If Timer1.Enabled = True Then Timer1.Enabled = False End Sub 通 过 程 序学 生 理 解IF 语句。IF 下面的语句执行语句条件是否成立否是精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 5 页，共 8 页 - - - - - - - - - - 新授3.退出按钮点击事件Private Sub Command3_Click() If Timer1.Enabled = True Then 如果定时器仍在工作MsgBox 请先停止

9、程序 弹出消息框警告Else 否则如果定时器已停止End 则退出程序End If End Sub 新授4.开始按钮点击事件Private Sub Command1_Click() Timer1.Enabled = True 定时器开始工作If Combo1.Text = 初级水平 Then 当为初级水平时Timer1.Interval = 600 时间间隔为600 毫秒ElseIf Combo1.Text = 中级水平 Then 当为中级水平时Timer1.Interval = 400 时间间隔为400 毫秒ElseIf Combo1.Text = 高级水平 Then 当为高级水平时Timer

10、1.Interval = 200 时间间隔为200 毫秒End If End Sub IF 语句的第三种结构多重分支结构，其格式为：If Then If Then . ELSE If Then End If 培 养 学 生阅 读 程 序的能力，测验 学 生 对选 择 结 构的 理 解 程度。END IF 下面的语句执行语句组1 条件是否成立是否执行语句组2 精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 6 页，共 8 页 - - - - - - - - - - 5.击中老鼠事件当鼠标点中老鼠图像时，程序

11、会弹出一个消息框，显示击中的信息。Private Sub Image2_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) MsgBox 抓住老鼠了！ 弹出消息框End Sub 学生练习1.电梯的最大容量为12 人，在此范围内电梯能正常运行，超出了这个范围电梯将发出警报。（C）Dim a as integer a=val(inputbox( “请输入进入电梯的人数”) . a=12 print “正常运行”print “发出警报”A.if then end if elseB.then if else

12、end ifC.if then else end ifD.if else then end if2.以下程序段运行后，分别输入5 和 6，则输出字符的排列顺序是（B ）I=val(inputbox( “请输入 I 的值” ) If I 6 then Print “#” ；Else Print “* ”End if A.*# B.#* C.# D.* 3语句 If x=1 Then y=1, 下列说法正确的是（C ） 。A、x=1 和 y=1 均为赋值语句B、x=1 和 y=1 均为关系表达式C、x=1 为关系表达式，y=1 为赋值语句D、x=1 为赋值语句， y=1 为关系表达培养学生阅读程序

13、的能力，测验学生对选择结构的理解程度。培 养 学 生阅 读 程 序的能力，测验 学 生 对选 择 结 构的 理 解 程度。课堂小结小结总结本堂课的内容。拓展活动编写“小游戏”程序。培养学生的探索、创新能力。培 养 学 生的创新，探索能力精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 7 页，共 8 页 - - - - - - - - - - 文档编码：KDHSIBDSUFVBSUDHSIDHSIBF-SDSD587FCDCVDCJUH 欢迎下载 精美文档欢迎下载 精品资料 - - - 欢迎下载 - - - - - - - - - - - 欢迎下载 名师归纳 - - - - - - - - - -第 8 页，共 8 页 - - - - - - - - - -