第讲选择结构

VisualBasic.Net第7讲选择结构

7.1If语句

7.2SelectCase7.3条件函数7.4综合应用7.1If条件语句

7.1.1单分支结构

If<表达式>Then

语句块

EndIf

或

If<表达式>Then<语句>流程动画演示7.1.1单分支结构

例

两个数x和y，比较其大小，使得x大于y。

Ifx<yThent=xx=yy=tEndIf

或Ifx<yThent=x:x=y:y=t7.1.2双分支结构7.1.2双分支结构

If表达式

Then

语句块1Else

语句块2EndIf或

If表达式

Then语句1Else

语句2

表达式语句块1语句块2其他语句TrueFalse流程动画演示7.1.2双分支结构例：计算分段函数单分支y=cos(x)－x^3+3*x结构实现Ifx<>0Theny=sin(x)+sqrt(x*x+1)

Ifx<>0Then双分支y=sin(x)+sqr(x*x+1)Else结构实现y=cos(x)－x^3+3*xEndIf7.1.3多分支结构

7.1.3多分支结构

If<表达式1>Then

语句块1ElseIf<表达式2>Then

语句块2

…

[Else语句块n+1]EndIf流程动画演示[例]已知输入某课程的百分制成绩Score，要求按五级制进行评定，评定条件如下：优秀Score≥90良好80≤Score<90中等70≤Score<80及格60≤Score<70不及格0<=Score<60例8-1NestIf.sln7.1.3多分支结构应用例8-2

已知变量ch中存放了一个字符,判断该字符是字母字符、数字字符还是其他字符。

多分支结构练习If语句的嵌套是指If或Else后面的语句块中又包含If语句。If表达式1Then

If表达式2Then…EndIf…EndIf7.1.4If语句的嵌套7.1.4If语句的嵌套Ifx<yThent=x:x=y:y=tIfy<zThent=y:y=z:z=tIfx<yThent=x:x=y:y=tEndIfEndIf例已知x，y，z三个数，使得x>y>z7.2SelectCase语句

SelectCase变量或表达式

Case表达式列表1

语句块1

Case表达式列表2

语句块2

…

[CaseElse

语句块n+1]EndSelect表达式列表的4种形式：表达式一组枚举值表达式1To表达式2Is关系运算符表达式7.2.1SelectCase语句7.2.2SelectCase应用将例8-2改用SelectCase语句实现：

SelectCasech Case"a"To"z"，"A"To"Z"

MsgBox(ch+"是字母字符") Case"0"To"9"

MsgBox(ch+"是数字字符") CaseElse

MsgBox(ch+"是其他字符")EndSelect例8-3SelectCase.sln7.2.2SelectCase应用例已知坐标点(x，y)，判断其落在哪个象限。SelectCasex,yCasex>0Andy>0MsgBox(“在第一象限”)Casex<0Andy>0MsgBox(“在第二象限”)Casex<0Andy<0MsgBox(“在第三象限”)Casex>0Andy<0MsgBox(“在第四象限”)EndSelect错误：1.SelectCase后不能出现多个变量；2.Case后不能出现变量及有关运算符。7.3条件函数7.3.1IIf函数

IIf(表达式，当表达式为True时的值， 当表达式为False时的值)Tmax=IIf(x>y，x，y)例:将x,y中较大的数放入Tmax变量(2)Choose函数Choose(数字类型变量，值为1的返回值，值为2的返回值…)DimIdxAsIntegerIdx=Val(txtInput.Text)IfIdx>0AndIdx<10ThenlblResult.Text="答案是："+_

Choose(Idx,

"水星","金星","地球","火星",-"木星","土星","天王星","海王星","冥王星")ElselblResult.Text="没有这颗行星"EndIf7.3.2Choose函数例根据Nop的值，得到+、-、×、÷中的某运算符：Op=Choose(Nop，"+"，"-"，"×"，"÷")7.3.2.条件函数DimnopAsInteger,opAsCharRandomize()nop=Int(Rnd()*4+1)op=Choose(nop,"+","-","×","÷")MsgBox("nop="&nop&"op="&op)7.3.3SwitchSwitch(idx="a","基础入门",idx="b","高级学习",idx="c","高级研究")引例例11-4：计算购房贷款。其中商贷的利率为：10年5％、20年8％、30年10％，公积金贷款的利率是商业贷款的90％，如果是初次贷款则利率再打九五折，请以单利计算每月的还款额。1.单选按钮(RadioButton)

单选按钮以组的形式出现，允许选择一项。（1）重要属性

Text属性

Checked属性一、单选按钮（2）重要事件

Click事件CheckedChanged事件 当某个单选按钮的状态被发生变化，该事件随之被触发。 一、单选按钮（1）重要属性Checked（2）重要事件:Click

CheckedChanged

二、复选框(CheckBox)

综合应用例11-5通过单选按钮和复选框选修课程三、框架(GroupBox)

框架具有容器功能