vb教程分支结构课件.ppt

该【vb教程分支结构课件 】是由【露露二天】上传分享，beplayapp体育下载一共【28】页，该beplayapp体育下载可以免费在线阅读，需要了解更多关于【vb教程分支结构课件 】的内容，可以使用beplayapp体育下载的站内搜索功能，选择自己适合的beplayapp体育下载，以下文字是截取该文章内的部分文字，如需要获得完整电子版，请下载此beplayapp体育下载到您的设备，方便您编辑和打印。第5章V选择结构程序设计isual本章要点:条件语句B?单行结构条件语句If...Then...Else?块结构条件语句If...Then...EndIfASIC多分支选择语句SelectCase...EndSelect程?序设特点:根据条件是否成立,<条件>Then[<语句组1>][Else<语句组2>]<条件>成立,则执行<语句组1>否则执行<语句组2>(1)<条件>:关系表达式、布尔表达式数值表达式(0为False,非0为True)字符串表达式("0"为False,非"0"为True)(2)<语句组1>、<语句组2>:可以有多条语句,各语句之间用冒号隔开。(3)可以没有Else部分,这时必须有<语句组1>。2例:IfN>0ThenA=A+B:B=B+AElseA=A-B:B=B-A例:IfX<>"aaa"ThenPrintX第五章【例5-1】设界面如下图所示,用文本框输入x的值,单击“计算Y”按钮时,根据以下公式计算y的值。|x|x≤0lnxx>0选择结构程序y=Text1Label3mand1_Click()Command1设X=Val()计IfX<=0ThenY=Abs(X)ElseY=Log(X)=(1)应作为一条语句书写(2)无论条件是否成立,都具有共同出口例:IfX>=0ThenX=1+XElseX=5-XY=1-X第五章共同出口选择结构程序设Print"Y=";Y若X=2则打印Y=-2若X=-2则打印Y=-6例:改写例5-1,比较:X=Val()X=Val()Y=Log(X)IfX<=0ThenY=Abs(X)=Y计Y=Abs(X)IfX>0ThenY=Log(X)=...THEN...IF...THEN...ELSE...ELSE…【例5-2】平面直角坐标系中,不同的象限内,点的坐标的符号有以下4种情况:第五章Y在A象限X>0,Y>0选择结构程序设计BCABCDX<0,Y>0X<0,Y<0X>0,Y<0XD任意输入一对坐标值,找出它所在的象限。5mand1_Click()X=Val():Y=Val()IfX=0OrY=0ThenPrint"不在任何象限内":_ExitSub第五章IfX>0ThenIfY>0ThenPrint"INA"Else_Print"IND"ElseIfY>0ThenPrint"INB"_ElsePrint"INC"<条件1>Then[语句组1]ElseIf<条件1>Then[<语句组1>]第五章[ElseIf<条件2>Then[<语句组2>]]……[语句组2]EndIf选择结构程序If语句[ElseIf<条件N>Then[<语句组N>]]ElseIf子句设[ElseElse子句计[<其他语句组>]]EndIf语句EndIf注意:格式书写、嵌套功能:……7【例5-3】输入华氏温度F,利用公式C=5/9*(F-32)转换成摄氏温度C,根据转换结果C的不同值,按以下要求给出相应的提示。第五章Text1Text2选择结构程序设计C>40时,打印"HOT"30="HOT"ElseIfC>="WARM"ElseIfC>="ROOMTEMPERATURE"ElseIfC>="COOL"ElseIfC>="COLD"="FREEZING"<测试表达式>Case<表达式表1>[<语句组1>]第五章[Case<表达式表2>[<语句组2>]]选择结构程序…[CaseElse[<语句组n>]]:根据测试表达式的值,按顺序匹配Case后的表达式,如果匹配成功,则执行该Case下的语句块,然后转到EndSelect语句之后继续执行。10