VB选择结构程序设计.ppt
- 文档编号:1394669
- 上传时间:2022-10-22
- 格式:PPT
- 页数:39
- 大小:823.50KB
VB选择结构程序设计.ppt
《VB选择结构程序设计.ppt》由会员分享,可在线阅读,更多相关《VB选择结构程序设计.ppt(39页珍藏版)》请在冰豆网上搜索。
第五章选择结构程序设计第五章选择结构程序设计1第第5章选择结构程序章选择结构程序设计设计本章要点本章要点:
条件语句条件语句单行结构条件语句单行结构条件语句If.Then.Else.块结构条件语句块结构条件语句If.Then.EndIf多分支选择语句多分支选择语句SelectCase.EndSelectTimer控件,单选按钮和复选按钮控件,单选按钮和复选按钮特点特点:
根据条件是否成立,决定程序的执行分支根据条件是否成立,决定程序的执行分支2第五章选择结构程序设计第五章选择结构程序设计5.5.1.11.1单行结构条件语句单行结构条件语句1.格式格式IfThenElse2.功能功能如果如果成立,则执行成立,则执行否则执否则执行行T语句组语句组1条件条件?
语句组语句组2F3第五章选择结构程序设计第五章选择结构程序设计3.说明说明
(1)可以是:
可以是:
关系表达式关系表达式布尔表达式布尔表达式数值表达式:
数值表达式:
0为为False;非非0为为True字符串表达式:
字符串表达式:
0为为False;非非0为为True
(2)可以没有可以没有Else部分,这时必须有部分,这时必须有。
T语句组语句组1条件条件?
F例例:
IfXaaaThenPrintX4第五章选择结构程序设计第五章选择结构程序设计(3)、:
可以有多条语句,可以有多条语句,各语句之间用冒号隔开。
各语句之间用冒号隔开。
例例:
IfN0ThenA=A+B:
B=B+AElseA=A-B:
B=B-A(4)(4)应作为一条语句书写。
如果语句太长需要换行,必须在折行处使用续行符号。
(5)无论条件是否成立,都具有共同出口无论条件是否成立,都具有共同出口例例:
IfX=0ThenX=1+XElseX=5-XY=1-XPrintY=;Y若若X=2Y?
若若X=-2Y?
共同出口共同出口(6)(6)单行结构条件语句可以嵌套单行结构条件语句可以嵌套IF.THEN.IF.THEN.ELSE.ELSE5第五章选择结构程序设计第五章选择结构程序设计【例【例5-1】设界面如下图所示,用文本框输入】设界面如下图所示,用文本框输入x的的值,单击“计算值,单击“计算Y”按钮时,根据以下公式计算按钮时,根据以下公式计算y的值。
的值。
|x|x0lnxx0y=PrivateSubCommand1_Click()X=Val(Text1.Text)IfX0ThenY=Log(X)Label3.Caption=Y程序段程序段2:
X=Val(Text1.Text)Y=Log(X)IfX=0ThenY=Abs(X)Label3.Caption=Y7第五章选择结构程序设计第五章选择结构程序设计5.1.2块结构条件语句块结构条件语句1.1.格式格式If1Then1ElseIf2Then2ElseIfNThenNElseEndIfIf1Then语句组语句组11Else语句组语句组22EndIfElseElse子句子句ElseIfElseIf子句子句IfIf语句语句EndIfEndIf语句语句注意注意:
格式书写格式格式书写格式8第五章选择结构程序设计第五章选择结构程序设计块结构条件语句的功能:
块结构条件语句的功能:
TTTF条件条件11语句组语句组11语句组语句组22条件条件22F条件条件nn语句组语句组nnF语句组语句组n+1n+19第五章选择结构程序设计第五章选择结构程序设计【例【例5-8】某百货公司为了促销,采用购物打折的】某百货公司为了促销,采用购物打折的优惠办法。
优惠办法。
1000元以上者,按九五折优惠;元以上者,按九五折优惠;2000元以上者,按九折优惠;元以上者,按九折优惠;3000元以上者元以上者,按八五折优惠;,按八五折优惠;5000元以上者,按八折优元以上者,按八折优惠;编写程序,输入购物款数,计算并输出优惠惠;编写程序,输入购物款数,计算并输出优惠价。
价。
分析:
设购物款数为分析:
设购物款数为x元,优惠价为元,优惠价为y元,则优惠付款公式元,则优惠付款公式为:
为:
x(x1000)0.95x(1000x2000)y=0.9x(2000x3000)0.85x(3000x=5000)10第五章选择结构程序设计第五章选择结构程序设计设计步骤如下:
(1)建立应用程序界面并设置对象属性,如图所示。
(2)编写程序代码.命令按钮command1的Click事件代码如下:
ElseIfx3000Theny=0.9*xElseIfx5000Theny=0.85*xElsey=0.8*xEndIfText2.Text=yEndSubPrivateSubcommand1_Click()DimxAsSingle,yAsSinglex=Val(Text1.Text)Ifx1000Theny=xElseIfx=0Theny=1Elsey=2EndIf以下两种写法都是错误的:
以下两种写法都是错误的:
写法一:
写法一:
Ifx=0Theny=1Elsey=2EndIf写法二:
写法二:
Ifx=1Theny=10Elsey=20EndIf12第五章选择结构程序设计第五章选择结构程序设计5.1.3多分支选择语句多分支选择语句1.格式格式SelectCaseCaseCaseCaseElseEndSelect2.功能功能:
根据测试表达式的值根据测试表达式的值,按顺序匹配按顺序匹配Case后的表达式后的表达式,如果匹配成功如果匹配成功,则执行该则执行该Case下的下的语句块语句块,然后转到然后转到EndSelect语句之后继续执行语句之后继续执行。
13第五章选择结构程序设计第五章选择结构程序设计语句组语句组n+1n+1TTTF匹配匹配表达式表表达式表1语句组语句组11语句组语句组22F语句组语句组nnF匹配表达匹配表达式表式表2匹配表达匹配表达式表式表n多分支选择语句的功能流程图多分支选择语句的功能流程图:
14第五章选择结构程序设计第五章选择结构程序设计3.说明说明:
数值或字符串表达式数值或字符串表达式Case表达式表表达式表:
表中的表项为如下形式表中的表项为如下形式:
(1)表达式表达式1,表达式表达式2.如如:
Case1,3,5
(2)表达式表达式1TO表达式表达式2如如:
Case10TO30CaseATOZ(3)Is如如:
CaseIs=10CaseIs=0与与Case0相同相同注意注意:
测试表达式的类型应与测试表达式的类型应与Case后表达式类型一致,后表达式类型一致,且三种形式可以混用且三种形式可以混用,如如:
CaseIs-5,0,5To100举例举例5-8vb5lt815第五章选择结构程序设计第五章选择结构程序设计【例【例5-12】任给定一年,判断是否是闰年,并任给定一年,判断是否是闰年,并根据给出的月份判断是什么季节和该月有多根据给出的月份判断是什么季节和该月有多少天。
少天。
分析:
根据闰年条件可得出判断闰年的逻辑表达式(Ymod4=0andymod1000)or(ymod400=0)每月的天数可根据月份来定,设计用户界面每月的天数可根据月份来定,设计用户界面如图所示,设置如图所示,设置5个标签,个标签,label3label5的的boardstyle设置为设置为fixedsinglePrivateSubCommand1_Click()DimyAsInteger,mAsIntegerDimleapyearAsBooleany=Val(Text1.Text)m=Val(Text2.Text)If(yMod4=0AndyMod1000)Or(yMod400=0)Thenleapyear=TrueLabel3.Caption=闰年闰年Elseleapyear=FalseLabel3.Caption=非闰年非闰年EndIf17第五章选择结构程序设计第五章选择结构程序设计SelectCasemCase3To5Label4.Caption=springCase6To8Label4.Caption=summerCase9To11Label4.Caption=autummnCase12,1,2Label4.Caption=winterEndSelect18第五章选择结构程序设计第五章选择结构程序设计SelectCasemCase1,3,5,7,8,10,12Label5.Caption=31天天Case4,6,9,11Label5.Caption=30天天Case2IfleapyearThenLabel5.Caption=29天天ElseLabel5.Caption=28天”天”EndIfEndSelectText1.SetFocusEndSubPrivateSubCommand2_Click()Text1.Text=Text1.Text=Label3.Caption=Label4.Caption=Label5.Caption=EndSub19第五章选择结构程序设计第五章选择结构程序设计如果在条件成立或不成立的情况下要继续如果在条件成立或不成立的情况下要继续判断其他条件,则可以使用嵌套的条件语句来实判断其他条件,则可以使用嵌套的条件语句来实现,也就是在语句组中再使用另一个条件语句。
现,也就是在语句组中再使用另一个条件语句。
5.1.4条件语句的嵌套条件语句的嵌套块结构条件语句的嵌套示例:
块结构条件语句的嵌套示例:
IfA=1ThenIfB=0ThenPrint*0*ElseIfB=1ThenPrint*1*EndIfElseIfA=2ThenPrint*2*EndIf20第五章选择结构程序设计第五章选择结构程序设计多分支选择语句的嵌套示例:
多分支选择语句的嵌套示例:
SelectCaseACase1SelectCaseBCase0Print*0*Case1Print*1*EndSelectCase2Print*2*EndSelect21第五章选择结构程序设计第五章选择结构程序设计多分支选择语句与块结构条件语句的互相多分支选择语句与块结构条件语句的互相嵌套示例:
嵌套示例:
SelectCaseACase1IfB=0ThenPrint*0*ElseIfB=1ThenPrint*1*EndIfCase2Print*2*EndSelect22第五章选择结构程序设计第五章选择结构程序设计5.2.1IIf函数函数格式格式:
IIf(,)功能功能:
当当的值为的值为True时,返回第时,返回第2个参数的值;当个参数的值;当的值为的值为False时,返回第时,返回第3个参数的值。
个参数的值。
(类似于具有类似于具有两个分支的两个分支的If语句的功能语句的功能)例例:
使用使用IIf函数求两个变量函数求两个变量A和和B的较大数。
的较大数。
MaxAB=IIf(AB,A,B)例例:
使用使用IIf函数求三个变量函数求三个变量A、B和和C的最大的最大数。
数。
MaxAB=IIf(AB,A,B)MaxABC=IIf(MaxABC,MaxAB,C)5.2条件函数条件函数23第五章选择结构程序设计第五章选择结构程序设计5.2.2Choose函数函数格式格式:
Choose(,.,
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VB 选择 结构 程序设计