vb条件判断结构程序设计教学案

《vb条件判断结构程序设计教学案》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、《VB条件判断结构程序设计》教学案例职高一计算机王攀【案例背景】职业高中计算机课程的实施，其课程目标定位于全面提升学生的计算机专业知识，其课程的设置从知识与技能，过程与方法，情感态度与价值观三个方面实施这个课程目标。然而面对学生素质的薄弱，要求教师要结合简单的生活实例，引导学生进行探索式学习，问题从简单的生活实例入手，过渡到课题的研究学习。原本枯燥无味的VB程序设计，在简单、形象的生活实例下，激发了学生的思考与探索思维。这样的教学案例，值得我们反思研究、总结与完善。【教材分析】控制结构是《VisualB

2、asic语言程序设计基础》中最重要的章节之一，本节主要研究最基本的条件判断结构，旨在使学生进一步体验算法思想，了解算法和程序设计在解决问题过程中的地位和作用；能从简单问题出发，设计解决问题的算法，并能初步使用一种程序设计语言编制程序实现算法解决问题。“条件判断结构”是《VisualBasic语言程序设计基础》第七章第一节的内容，共分三课时，本课为第一课时。主要内容是用选择结构编写简单的程序解决具体问题。用选择结构编写简单的程序解决具体问题是在学生已经掌握了程序设计数据的表示与处理的基础上，理解了顺序结构

3、的前提后提出的。通过本课的学习，可以促进学生对问题解决方法和思想的理解与掌握，从而提升学生的问题解决能力，让学生在按照一定的流程解决问题的过程中，去体会和理解程序设计的思想，而且也为多分支选择结构的学习打下基础。【学生分析】高一的学生在对事物的分析、综合能力及独立思考能力、分析解决问题的能力都有了一定的水平，在教师的有效引导下，有能力进行自我探究，如果用一种学生比较感兴趣的，能够贴近学生日常生活的例子来分析选择结构的话，那么学生会比较感兴趣。【教学目标分析】通过教师引导学生去探究、发现技术背后所蕴含的技

4、术价值和技术思想，使其获得知识与技能的同时，理解和掌握过程与方法、这样才能够学会认知，学会做事，乃至学会生活，提高终生学习的能力、分析解决问题的能力，满足其终身发展的需要，成为适应信息社会的公民。　　因此本节课的目标有以下几项：　　1、知识与技能：（1）掌握分支选择结构实现条件判断控制。　　（2）能够运用分支选择结构设计编制程序解决问题。　　（3）培养学生的逻辑思维能力，促进学生对问题解决方法的理解。　　2、情感态度：通过趣味性教学，使同学们保持高涨的学习兴趣，在操作的同时获得成功的喜悦。【教学重点难点

5、】教学重点：让学生学会使用VB语言的If分支语句，掌握分支判断程序结构，来解决实际问题，并且培养学生的探索、创新能力。教学难点：对解决问题的方法和步骤的理解，并能根据实际问题写出程序代码。教学关键点：利用学生已经掌握的数学知识，引导学生综合VB的三种程序结构，努力发挥学生的研究性学习能力，培养学生创造性思维和综合运用知识的能力。【教学过程】一、设计情境、引入新课师：在餐馆点餐时遇到没有的餐品时会怎么做（换道菜还是直接离开），换菜的话是接受服务员的推荐还是重新再点（屏幕演示）生：根据情景最出适应的回答设计

6、意图：这个生活案例，主要是引出选择结构的语法（If……Then……Else），这样的现实例子处处都是，目的是让多数的学生都能感受程序设计的乐趣，引入本节的课题。二、合作探究、获得新知师：VB程序设计实例（求数的绝对值）——屏幕演示师生交流：讨论程序中的代码PrivateSubCommand1_Click()'求输入数值的绝对值DimAAsIntegerA=Val(text1.text)IfA>=0ThenPrint"Y="；AElsePrint"Y="；-AEndSub引出知识点：通过实例展示分析，引出

7、在VB中If语句的基本用法。——语法1If条件Then语句1Else语句2屏幕演示，师生互相讨论师：1、关键字：ifthenelseendif2、条件是关系表达式或者是逻辑表达式，关系表达式是用关系运算符连接起来的式子。例：A>0；A<>0；AMod2=0语法2If条件Then语句组1Else语句组2EndIf三、练习反馈、应用拓展——屏幕演示练习任务：设计一个程序，输入三角形的三条边，并求出对应的三角形面积1、算法分析（师生互动）①输入三条边（定义变量）②判断这三条边是否能构成三角形（生：依据？）③计

8、算三角形面积的方法（生：（P=A+B+C）/2；S=SQR（P*（P-A）*（P-B）*（P-C））④输出：三角形面积S/不能构成三角形2、程序设计师：程序界面设计——屏幕演示3、程序代码编写，解决问题（上机实践）（第二课时在机房上课时）师生互动：学生编写程序代码，教师指导教学PrivateSubCommand1_Click()Dima，b，c，p，sAsSinglea=Val(text1.Text)b=Val(text2.Text)c=V