2、?5语句格式:If<条件>Then<语句块1>Else<语句块2>EndIf条件语句块1语句块2TF执行过程:2.双分支结构6例4-2:某地至北京的邮路里程为1043公里,通过邮局向北京邮寄“特快专递”,计费标准每克为0.05元,但超过100克后,超出数每克为0.02元。编写程序计算邮费。w*0.05w<=100100*0.05+(w-100)*0.02w>100F=7DimW!,F!W=InputBox(“请输入邮件重量:”)IfW<=100ThenF=0.05*wElseF=5+(w-100)*0.02EndIfPrint“邮件重量为:”;W,“
3、邮费为:”;F83.条件函数IIf函数可用来执行简单的条件判断操作,它是“If…Then…Else”结构的简写版本。格式:Result=IIf(<条件>,,)功能:当<条件>为真时,IIf函数返回“True部分”,而当<条件>为假时,IIf函数返回“False部分”。说明:Result函数的返回值,、及结果变量的类型要一致。例如,dimd%,x%d=IIf(x>0,1,0)'如果变量x的值大于0,变量d的值为1,否则为0。9又如,dimstr1,x%,y%PrintIIf(x>y,“
4、x大于y”,“y大于或等于x”)'如果x>y,输出“x大于y”,否则输出“y大于或等于x”再如,用IIf函数改写例4.2DimW!,F!W=InputBox(“请输入邮件重量:”)F=IIf(W<=100,0.05*w,5+(w-100)*0.02)Print“邮件重量为:”;W,“邮费为:”;F10If-EndIf语句实现多分支语句格式:If〈表达式1〉Then〈语句块1〉ElseIf〈表达式2〉Then〈语句块2〉……Else〈语句块n+1〉EndIf4.2.2多分支结构条件1语句块1条件2条件n语句块2语句块n语句块n+1TTTFFF执行过程1
5、1例4-4:输入一学生成绩x,评定其等级。方法是:90~100分为“优秀”,80~89分为“良好”,70~79分为“中等”,60~69分为“及格”,60分以下为“不及格”。x=Val(InputBox(“输入成绩”))Ifx>=90thenPrint"优秀"ElseIfx>=80ThenPrint"良好"ElseIfx>=70ThenPrint"中等"ElseIfx>=60ThenPrint"及格"ElsePrint"不及格"EndIf12IfX>0ThenY=1ElseIfX=0ThenY=0ElseY=-1EndIfY=IIf(X>0,1,IIf
6、(X=0,-1,0))B)Y=IIf(X=0,0,IIf(X>0,1,-1))C)Y=IIf(X<0,IIf(X>0,1,0),-1)D)Y=IIf(X>0,IIf(X<0,-1,0),1)例:在下列赋值命令中,与If语句等效的是:13语句格式:SelectCase<表达式>Case<表达式列表1><语句块1>Case<表达式列表2><语句块2>………Case<表达式列表n><语句块n>[CaseElse<语句块n+1>]EndSelect表达式列表2表达式列表1表达式列表n语句块1语句块2语句块n语句块n+1YNNNYY…执行过程求表达式的值2.S
7、electCase语句实现多分支14说明:各Case中的<表达式列表>要与SelectCase中的<表达式>是同类型的下面四种形式之一:例:SelectCasex‘变量x是数值<表达式列表>的四种形式表达式A+5‘变量x的值为表达式A+5的值一组枚举表达式(用逗号分隔)2,4,6,8‘变量x的值分别为2,4,6,83.表达式1To表达式260to100‘变量x的值为60~100Is关系运算符表达式Is<60‘变量x的值小于6015SelectCasexCase90to100Print"优秀"Case80to89Print"良好"Case70to79P
8、rint"中等"Case60to69Print"及格"CaseElsePrint"不及格"EndSelect