vb选择结构教案Word格式.docx
- 文档编号:16232769
- 上传时间:2022-11-21
- 格式:DOCX
- 页数:9
- 大小:44.83KB
vb选择结构教案Word格式.docx
《vb选择结构教案Word格式.docx》由会员分享,可在线阅读,更多相关《vb选择结构教案Word格式.docx(9页珍藏版)》请在冰豆网上搜索。
第一步:
独学(请同学们独立完成以下任务)
知识回顾:
1、单分支条件语句格式:
①IF<
表达式>
THEN
语句块
EndIf
②IF<
THEN语句块
2、双分支条件语句格式:
IF<
THEN
语句块1
Else
语句块2
任务1(基本设计题)
题目:
一般网络游戏只允许成年人进入,你来编写一个根据年龄判断是否成年的小程序。
(规定成年人年龄>
18周岁)
请你根据题意,利用双分支条件语句格式2种方法(单行和多行)编写程序代码,并上机测试。
设计界面如下:
编写程序代码:
第二步:
合作(问题)探究(对学、群学)
任务2.(提高设计题)
在“神州号”程序中,需要判断飞船飞行状况。
当飞船速度继续加大时,飞船将达到第二宇宙、第三宇宙速度(见下表)试编写程序,输入不同的飞船速度V,判断它的各种飞行状况,显示出来
飞船速度V单位(km/s)
飞行状况
情况
7.91<
=V<
11.19
1--MovearoundEarth飞船绕地球做匀速圆周运动
1
1119<
16.67
2--MovearoundSUN飞船离开地球的控制,围绕太阳转
2
V>
3--Breakgravitateofsolar飞船挣脱太阳引力飞出太阳系
3
其它
警告出错信息
程序界面如下:
补充程序代码:
PrivateSubcommand1_click()
DimVASsingle,nASinteger
V=VAL(InputBox(“SPEED=”,”输入速度”))
SELECTCASEV
Caseis<
7.9
Printv,“警告Warning”
CASE_______________________
Printv,“绕地球”
CASEIS<
16.67
___________________________
CASEis>
=16.67
Printv,“飞出太阳系”
_________________________________
Endsub
上机验证并填写下表
测试速度
飞行状况
V=8
V=7.8
V=12
V=16.67
3、课后作业
铁路托运行李,从甲地到乙地,规定每张客票托运费计算方法是行李重量不超过50kg时,0.25元/kg,超过50kg而不超过100kg时,其超过部分按0.35元/kg收费,超过100kg时,其超过部分按0.45元/kg收费。
编写程序,输入行李重量,计算并输出托运的费用。
分析:
设行李重量为wkg,应付运费为x元,则运费公式为:
PrivateSubCommand1_Click()
DimwAsSingle,xAsSingle
w=Val(Text1.Text)
Ifw<
=50Then
________________________
Else
If_________________Then
x=0.25*50+0.35*(w–50)
x=0.25*50+0.35*50+0.45*(w–100)
______________
_______________
Text2.Text=x
EndSub
第三步:
分配展示任务(随机抽查)
一组:
二组:
三组:
四组:
五组:
六组:
第四步:
总结评价(请同学们自行阅读并记忆)
选择结构语句的格式:
⏹单分支:
⏹双分支:
语句块1
语句块2
⏹多分支:
①If语句的嵌套格式
是指语句序列1或语句序列2本身又是一个If语句
If<
条件1>
Then
If<
条件2>
<
语句序列1>
语句序列2>
语句序列3>
EndIf
②SelectCase语句格式:
SelectCase变量或表达式
Case表达式列表1
语句块1>
Case表达式列表2
语句块2>
…….
[CaseElse
语句块n+1>
]
EndSelect
第五步:
分配展示任务:
二组:
四组:
六组:
第六步:
总结评价
【学法指导】学生总结梳理,教师拓展提升。
学习内容与过程
用3-5分钟把展示内容在组内再准备一下,并派人提前写板书。
【展示要求】
板书规范
自信大方
声音洪亮
质疑对抗
互动精彩
【为您点拨疑难】
【答疑解惑】
【易错点】
【易混点】
展示案
一、分组备展:
二、分组展示:
三、巩固练习:
四、总结评价:
学习指导
【对子帮扶】
【扶弱济困】
【人人达标】
【数字式】
【列表式】
【树枝式】
【图示式】
【挑战一下自己!
】
反馈达标案
一、分层检测(A、B、C三层,分必答和选答题)
二、分层达标训练:
三、知识点(思维导图梳理)
四、拓展提升:
【层层拔高优者更优】
(理论迁移)
五、总结评价:
我的收获:
——————————————————————————————————————————--------————————————————。
我的反思——————————————————————————————————————————————————————————————。
名人名言:
学生最大的敌人就是依赖,教师最大的悲哀就是包办。
————崔其升
逸闻趣事:
曹冲称象……
数学谜语……
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 选择 结构 教案
![提示](https://static.bdocx.com/images/bang_tan.gif)