vb选择结构教案.doc

《vb选择结构教案.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、卓资县职业中学实训学案班级_____姓名_________科目：VB程序设计主备：闫森审核：日期：课题：选择结构程序设计实际应用（2）实验目的：1、掌握If语句的使用。2、掌握SelectCase语句的使用。实验内容与过程说明：本节课只完成任务1和任务2的题目要求及问题。课后作业下次实训务必完成。第一步：独学（请同学们独立完成以下任务）知识回顾：1、单分支条件语句格式：①IF<表达式>THEN语句块EndIf②IF<表达式>THEN语句块2、双分支条件语句格式：IF<表达式>THEN语句块1Else语句块2EndIf任务

2、1(基本设计题)题目：一般网络游戏只允许成年人进入，你来编写一个根据年龄判断是否成年的小程序。（规定成年人年龄>18周岁）请你根据题意，利用双分支条件语句格式2种方法（单行和多行）编写程序代码，并上机测试。设计界面如下：编写程序代码：第二步：合作（问题）探究（对学、群学）任务2.（提高设计题）在“神州号”程序中，需要判断飞船飞行状况。当飞船速度继续加大时，飞船将达到第二宇宙、第三宇宙速度（见下表）试编写程序，输入不同的飞船速度V，判断它的各种飞行状况，显示出来飞船速度V单位（km/s）飞行状况情况7.91<=V<11.1

3、91--MovearoundEarth飞船绕地球做匀速圆周运动111 19<=V<16.672--MovearoundSUN飞船离开地球的控制,围绕太阳转2V>16.67 3--Breakgravitateofsolar飞船挣脱太阳引力飞出太阳系3其它警告出错信息0程序界面如下：补充程序代码：PrivateSubcommand1_click()DimVASsingle,nASintegerV=VAL(InputBox(“SPEED=”,”输入速度”))SELECTCASEVCaseis<7.9Printv,“警告Warn

4、ing”CASE_______________________Printv,“绕地球”CASEIS<16.67___________________________CASEis>=16.67Printv,“飞出太阳系”_________________________________Endsub上机验证并填写下表测试速度飞行状况V=8V=7.8V=12V=16.673、课后作业题目：铁路托运行李，从甲地到乙地，规定每张客票托运费计算方法是行李重量不超过50kg时，0.25元/kg，超过50kg而不超过100kg时，其超过

5、部分按0.35元/kg收费，超过100kg时，其超过部分按0.45元/kg收费。编写程序，输入行李重量，计算并输出托运的费用。分析：设行李重量为wkg，应付运费为x元，则运费公式为：程序界面如下：补充程序代码：PrivateSubCommand1_Click()DimwAsSingle,xAsSinglew=Val(Text1.Text)Ifw<=50Then________________________ElseIf_________________Thenx=0.25*50+0.35*(w–50)Elsex=0.25

6、*50+0.35*50+0.45*(w–100)_____________________________Text2.Text=xEndSub第三步：分配展示任务（随机抽查）一组：二组：三组：四组：五组：六组：第四步：总结评价（请同学们自行阅读并记忆）选择结构语句的格式：n单分支：①IF<表达式>THEN语句块EndIf②IF<表达式>THEN语句块n双分支：IF<表达式>THEN语句块1Else语句块2EndIfn多分支：①If语句的嵌套格式是指语句序列1或语句序列2本身又是一个If语句If<条件1>ThenIf<条件

7、2>Then<语句序列1>Else<语句序列2>Else<语句序列3>EndIfEndIf②SelectCase语句格式：SelectCase变量或表达式Case表达式列表1<语句块1>Case表达式列表2<语句块2>…….[CaseElse<语句块n+1>]EndSelect第五步：分配展示任务：一组：二组：三组：四组：五组：六组：第六步：总结评价【学法指导】学生总结梳理，教师拓展提升。学习内容与过程用3-5分钟把展示内容在组内再准备一下，并派人提前写板书。展示案一、分组备展：二、分组展示：三、巩固练习：四、总结评价：

8、【展示要求】板书规范自信大方声音洪亮质疑对抗互动精彩【为您点拨疑难】【答疑解惑】【易错点】【易混点】学习指导学习内容与过程【对子帮扶】【扶弱济困】【人人达标】反馈达标案一、分层检测（A、B、C三层，分必答和选答题）二、分层达标训练：三、知识点（思维导图梳理）四、拓展提升：【层层拔高优者更优】（理论迁移）五、总结评价：