程序的选择结构.pptx

2.3程序的选择结构;Ifyouenjoyrunningeverymorning，thenpleaseputyourrighthand，elsepleaseputyourlefthand．;2.3.2条件语句;2.条件语句的执行过程;3.关系表达式;关系表达式的值定义如下：

（1）对数值型的数据比较，是按照数值的大小来比较他们的关系。如：

136其值为true；98=89其值为false。

（2）对其他数据类型的比较，则按照其序号来进行比较。如：

”A””B”其值为ture；”C””D”其值为false。;4.逻辑表达式;5.逻辑运算的顺序

（1）当条件中只有逻辑运算符时，运算顺序为not、and、or

（2）当条件中既有算数运算符，又有关系运算符和逻辑运算符时，运算顺序是：

算数运算符关系运算符逻辑运算符

例如：;（1）阅读下列程序，分别写出当A=15和A=-9时程序的运行结果，说明程序的功能，并上机验证。

PrivatesubCommand1_click()

DimAAsInteger

A=InputBox(“请输入A的值：”)

IfA=0ThenPrint“Y=”;AElsePrint“Y=”;-A

EndSub;分组讨论并回答下列问题：

幼儿园规定只收2～6岁的儿童，2～3岁入小班，4岁入中班，5～6岁入大班，现输入年龄，要求打出入什么班。

问题：1、如果用If语句来解决这个问题，请问用几个If语句来完成？

2、这么多的If语句给我们带来了哪些不便的地方？

PrivateSubCommand1_Click()

Age=Inputbox(“请输入年龄”)

IfAge=2orage=3orage=4orage=5age=6then

IfAge=2Orage=3then

Print“该儿童应该入小班”

Endif?

IfAge=4then

Print“该儿童应该入中班”

Endif?

IfAge=5Orage=6then

Print“该儿童应该入大班”

Endif?

Else

Print“该儿童不能上幼儿园”

Endif?

EndSub;PrivateSubCommand2_Click()

Age=Inputbox(“请输入年龄”)

Selectcaseage

Case2,3

Print“该儿童应该入小班”

Case4

Print“该儿童应该入中班”

Case5,6

Print“该儿童应该入大班”

Caseelse?

Print“该儿童不能上幼儿园”

Endselect

EndSub;2.3.3多重选择语句;再见