VB电子教案

整理文档很辛苦,赏杯茶钱您下走!

免费阅读已结束,点击下载阅读编辑剩下 ...

阅读已结束,您可以下载文档离线阅读编辑

资源描述

课题第七章控制结构:条件判断语句课时1教学目标掌握IF……THEN……ELSE语句教学重点理解并掌握条件判断结构中的IF……THEN……ELSE语句的语法、功能及使用方法,掌握分支结构程序的设计方法教学难点使用条件判断结构中的IF……THEN……ELSE语句编程课型新授课教法讲练结合教具多媒体教学过程组织教学清点人数,组织纪律,准备教授新课。导课在日常生活中,我们都要做出选择例如:今天如果下雨,我们就在家;否则(不下雨)我们就去旅游。又如:如果已经搜索得到结果,就打印出答案;否则(还没得到结果)就继续搜索。在解决一些实际问题时,往往需要计算机按照给定的条件进行分析和判断,然后根据判断结果的不同情况,执行程序中的不同程序代码,这就需要使用条件判断结构。条件判断结构也叫分支结构或选择结构,它有多种形式,分别使用不同的语句。如果判断结构比较简单,只有两个分支,这时就可使用IF……THEN……ELSE语句。新课下面来学习IF……THEN……ELSE语句。IF……THEN……ELSE语句有单行式或区块式两种形式。1.单行式语法:If条件表达式Then语句1[Else语句2]功能:当条件表达式成立时,执行关键字Then后面的语句1,否则执行关键字Else后面的语句2。2.区块式语法:If条件表达式Then语句序列1[Else语句序列2]EndIf功能:当条件表达式成立时,执行关键字Then后面的语句序列1,否则,执行关键字Else后面的语句序列2。无论执行的是语句序列1,还是语句序列2,执行完以后都要执行EndIf后面的语句。例题:从键盘任意输入三个数,输出最小数。PrivateSubForm_Activate()DimAAsInteger,BAsInteger,CAsIntegerA=InputBox(请输入变量A的值,输入窗口)B=InputBox(请输入变量B的值,输入窗口)C=InputBox(请输入变量C的值,输入窗口)IfABThenA=BIfACThenA=CPrint最大值为;AEndSub练习:从键盘输入学生成绩,如果大于60则输出及格,否则为不及格。小结本节学生掌握了用IF……THEN……ELSE语句编程作业比较x,y中的数,将大数放在x中,小数放在y中教后感本节内容比较简单,易学,学生可以掌握IF……THEN……ELSE语句,主要是自己编程还需要上机练习。课题第七章控制结构:条件判断语句课时2教学目标掌握IF……THEN……ELSE语句教学重点掌握条件判断结构中的IF……THEN……ELSE语句的语法、功能及使用方法,掌握分支结构程序的设计方法教学难点使用条件判断结构中的IF……THEN……ELSE语句编程对赋值语句的理解与使用课型新授课教法讲练结合教具多媒体教学过程组织教学清点人数,组织纪律,准备教授新课。导课向学生演示程序:从键盘任意输入三个数,要求按从小到大的顺序进行排列。问学生会做这个程序吗?方法引导学生做本程序,通过案例演示,激发学生对本节课的兴趣。回顾并提问IF……THEN……ELSE的两种格式引入案例1:比较x,y中的数,将大数放在x中,小数放在y中。格式1:ifxythenw=X:x=y:y=w格式2:ifxythenw=xx=yy=wendif讲解:赋值与中间变量的引用,进行交换案例2:已知x,y,z3个数,。要求按从小到大的顺序进行排列Privatesubform_activate()DimAAsInteger,BAsInteger,CAsIntegerX=8,Y=5,Z=9Ifxythenw=x:x=y:y=w‘将x,y中的小数存放于x中Ifxzthenw=x:x=z:z=w‘将x,z中的小数存放于x中,此时X为最小数Ifyzthenw=y:y=z:z=w‘将y,z中的小数存放在y中Printx,y,zEndsub重点:讲解三个数如何比较,方法思路最重要练一练:从键盘输入三个数,要求按从小到大的顺序进行排列PrivateSubform_activate()DimAAsInteger,BAsInteger,CAsIntegerX=InputBox(请输入变量A的值:,输入窗口)Y=InputBox(请输入变量A的值:,输入窗口)Z=InputBox(请输入变量A的值:,输入窗口)PrintX=;XPrintY=;YPrintZ=;ZIfXYThenw=X:X=Y:Y=w'将x,y中的小数存放于x中IfXZThenw=X:X=Z:Z=w'将x,z中的小数存放于x中,此时X为最小数IfYZThenw=Y:Y=Z:Z=w'将y,z中的小数存放在y中PrintX,Y,ZEndSub作业从键盘输入三个数,要求按从大到小的顺序进行排列教后感本节效果好,以案例演示激发学生对本节课的兴趣,通过一步步引导学生由简入难,掌握编程方法与思路,学会用IF……THEN……ELSE语句编程。课题第七章控制结构:条件判断语句课时3、4教学目标掌握条件判断结构中的IF……THEN……ELSE语句的语法、功能及使用方法,掌握分支结构程序的设计方法教学重点利用条件判断结构中的第一种语句编程教学难点利用条件判断结构中的第一种语句编程课型上机课教法上机操作教具多媒体教学过程组织教学清点人数,组织纪律。上机任务1.从键盘任意输入三个数,输出最大数。参考代码:PrivateSubForm_Activate()DimAAsInteger,BAsInteger,CAsIntegerA=InputBox(请输入变量A的值,输入窗口)B=InputBox(请输入变量B的值,输入窗口)C=InputBox(请输入变量C的值,输入窗口)IfABThenA=BIfACThenA=CPrint最大值为;AEndSub2.从键盘输入三个数,要求按从大到小的顺序进行排列PrivateSubform_activate()DimAAsInteger,BAsInteger,CAsIntegerX=InputBox(请输入变量X的值:,输入窗口)Y=InputBox(请输入变量Y的值:,输入窗口)Z=InputBox(请输入变量Z的值:,输入窗口)PrintX=;XPrintY=;YPrintZ=;ZIfXYThenw=X:X=Y:Y=w'将x,y中的大数存放于x中IfXZThenw=X:X=Z:Z=w'将x,z中的大数存放于x中,此时X为最小数IfYZThenw=Y:Y=Z:Z=w'将y,z中的大数存放在y中PrintX,Y,ZEndSub要求:学生用IF……THEN……ELSE语句编程,在E盘建立个人文件夹进行保存,并写实验报告。教后感通过本次上机,发现学生问题很多,VB编程中标点符号要用英文状态,部分学生用中文状态,对于工程的保存不会,部分学生没有完成上机任务,以后上机前要留好上机任务,让学生有准备上机进行调试。课题第七章控制结构:条件判断语句课时5教学目标掌握If…Then…ElseIf语句教学重点掌握条件判断结构中的If…Then…ElseIf语句的语法、功能及使用方法,掌握分支结构程序的设计方法教学难点使用条件判断结构中的IF……THEN……ELSEIF语句编程课型新授课教法讲练结合教具多媒体教学过程组织教学清点人数,组织纪律,准备教授新课。导课向学生演示程序:利用输入框输入学生成绩若学生成绩大于等于90则输出优秀,若学生成绩小于90且大于等于60则输出及格,若低于60则输出不及格。上节课我们学习了两种分支的情况,如果是三种分支情况怎么编程呢?方法引导学生做本程序,通过案例演示,激发学生对本节课的兴趣。新课下面来学习IF……THEN……ELSEIF语句语法:If条件表达式1Then语句序列1[ElseIf条件表达式2Then语句序列2]...[Else语句序列n+1]EndIf功能:首先测试条件表达式1,如果其值为True,则执行语句序列1,然后跳过关键字ElseIf至EndIf之间的语句,而执行关键字EndIf后面的语句;反之,如果条件表达式1的值为False,则测试条件表达式2,依次类推,直到找到一个值为True的条件表达式,并执行其后面的语句序列,然后接着执行EndIf后面的语句;如果条件表达式的值都不是True,则执行关键字Else后面的语句序列n+1,然后接着执行EndIf后面的语句。案例1:利用输入框输入学生成绩若学生成绩大于等于90则输出优秀,若学生成绩小于90且大于等于60则输出及格,若低于60则输出不及格PrivateSubform_activate()DimscoreasintegerScore=inputbox(“请输入成绩:”)Ifscore=90thenPrint”优秀”Elseifscore=60thenPrint”及格“ElsePrint”不及格”EndifEndsub练一练:利用输入框输入学生成绩若学生成绩大于等于90则输出优秀,若学生成绩小于90而大于等于80则输出良好,若学生成绩小于80分而大于等于60分,则输出可以,如学生成绩低于60则输出不及格。作业2XX0从键盘输入任一X的值,求分段函数Y=0X=0|X|X0教后感本节效果好,以案例演示激发学生对本节课的兴趣,介绍IF……THEN……ELSEif语句的语法、功能及使用方法,掌握用该语句进行编程,熟练程度还需要上机加强练习。课题第七章控制结构:条件判断语句课时6教学目标掌握SelectCase语句教学重点掌握条件判断结构中的SelectCase语句的语法、功能及使用方法,掌握分支结构程序的设计方法教学难点使用条件判断结构中的SelectCase语句编程课型新授课教法讲练结合教具多媒体教学过程组织教学清点人数,组织纪律,准备教授新课。导课IF……THEN……ELSEIF语句可以包含多个ElseIf子语句,这些ElseIf子语句中的条件表达式一般情况下是不同的。但是,当每个ElseIf子语句后面的条件表达式相同,而条件表达式的值并不相同时,使用IF……THEN……ELSEIF语句编写程序就显得很烦琐,在这种情况下可以使用SelectCase语句。新课下面来学习SelectCase语句语法:SelectCase表达式[Case取值1语句序列1][Case取值2语句序列2]...[CaseElse语句序列n+1]EndSelect功能:先计算表达式,然后,将表达式的值依次与语法中的每个Case关键字后面的取值进行比较,如果相等,就执行该Case后面的语句序列;如果都不相等,则执行CaseElse子语句后面的语句序列。无论执行的是哪一个语句序列,执行完后都要接着执行关键字EndSelect后面的语句。说明:(1)表达式可以是任何数值表达式或字符串表达式;(2)每一个case后面的取值都是表达式可能取得的结果,其取值的格式有以下三种:数值型或字符串型常量值;数值或字符串区间;IS表达式案例1:利用输入框输入学生成绩若学生成绩大于等于90则输出优秀,若学生成绩小于90且大于等于60则输出及格,若低于60则输出不及格PrivateSubform_activate()DimscoreasintegerScore=inputbox(“请输入成绩:”)Ifscore=90thenPrint”优秀”Elseifscore=60thenPrint”及格“ElsePrint”不及格”EndifEndsub将本程序中的IF……THEN……ELSEIF语句改写为SelectCase语句。PrivateSubform_activate()DimscoreasintegerScore=inputbox(“请输入成绩:”)SelectcasescoreCaseis=90Print”优秀”Caseis=60Print”及格“CaseElsePrint”不及格”EndselectEndsub练一练:利用输入框输入学生成绩若学生成绩大于等于90则输出优秀,若学生成绩小于90而大于等于80则输出良好,若学生成绩小于80分而大于等于60分,则输出可以,

1 / 116
下载文档,编辑使用

©2015-2020 m.777doc.com 三七文档.

备案号:鲁ICP备2024069028号-1 客服联系 QQ:2149211541

×
保存成功