选择结构程序设计VIP免费

选择结构的程序可以用选择语句来表示。选择语句又称条件语句、分支语句或判断语句。选择语句能使程序在执行过程中，根据不同的结果，选择执行不同的处理。语句的主要形式是If语句。2．6选择结构程序设计1．行If语句行If语句必须在一行内写完。该语句的执行过程是：先计算条件表达式的值，如果条件表达式的计算结果是True，就执行Then后面的语句，否则执行Else后面的语句。如果Else和它的后随语句不出现，则条件表达式值为True时执行Then后面的语句，否则就什么也不执行，程序转向If语句后面的后继语句。行If语句格式如下：If条件表达式Then语句1Else语句2或If条件表达式Then语句2．块If语句块If语句的格式如下：If条件表达式1Then语句块1ElseIf条件表达式2Then语句块2……ElseIf条件表达式nThen语句块nElse语句块0EndIf说明：①这儿的语句块可以由一个或多个语句组成。如果只有两种不同情形的分别处理，则中间所有的ElseIf部分都不必书写，只保留语句块1和语句块0相应的部分即可，即块If语句可以简化为以下格式：If条件表达式1Then语句块1Else语句块0EndIf②“块语句的执行过程是：先测试条件表达式1”，如果该条件为“True”，则执行Then“后面的语句块1”“；如果条件表达式1”为False，则顺序测试每个ElseIf“”“子句中的条件表达式，当发现某个”条件表达式为True时，就执行与其相关的Then“”后面的语句块；如果所有的ElseIf“”条件表达式均为False，则执行Else“后面的语句块0”。③在块结构的条件语句中，ElseIf子句的数量没有限制，可以根据需要加入任意多个ElseIf子句。④在有些时候，块结构的条件语句中可能出现多个条件为True的情况，此时只能执行一个语句块，即当遇到第一个为True的条件时，执行相应语句后就跳出If结构，去执行下面的语句。⑤块结构的条件语句可以嵌套，即把一个If…Then…Else放在另一个If…Then…Else“”“块内，嵌套必须完全包住，不能相互”骑跨。3．当条件表达式为True或False时进行处理的语句都只有一个时，可采用行If语句，也可采用块If语句；而如果分支中进行处理的语句不止一个时，必须采用块If语句。块条件形式的语句可以简化为：If条件表达式Then语句块EndIf行If语句必须在一行内写完，最后没有EndIf；块If语句的ElseIf部分和Else语句部分是可选的，最后必须有EndIf。4．Exit和End语句使用Exit语句可以在程序执行过程中退出事件过程。如ExitSub。使用End语句可以在程序执行过程中，关闭程序。示例如下：PrivateSubCommand1_Click()DimaAsIntegera＝MsgBox(“你确定要关闭吗？”，1,“”关闭)Ifa＝1ThenExitSub'关闭程序，此处可用End'EndElsePrint“留下”EndIfEndSub本章节学习中需要掌握行If语句与块If语句的使用方法，并会使用If语句编写简单的选择结构的VB程序。难点是掌握块If语句的嵌套使用方法。考查方式为选择题与填空题。1．有如下VB程序段：a＝5:b＝3IfNotb＝1Theny＝x＋1Elsey＝x–1后，变量y的值是()A．－1B．0C．1D．2C3．已知a、b、c为某三条线段的长度，判断这三条线段能否构成一个三角形的VB程序代码如下：PrivateSubCommand1_Click()a＝20b＝13c＝5Ifa＋b>cAndb＋c>aAndc＋a>bThenMsgBox“”能构成ElseMsgBox“”构不成EndSub运行程序，单击命令按钮Command1后，结果是()A“”．弹出对话框中显示能构成B“”．弹出对话框中显示构不成C“．出现块If没有EndIf”的错误信息D“．出现False”的错误信息4．有如下VB程序段：PrivateSubCommand1_Click()a＝3:b＝4:c＝5Ifa>＝bAnda>＝cThenMax＝aElseIfb>＝cThenMax＝bElseMax＝cEndIfEndSub该程序运行后，整数型变量max的值为()A．0B．3C．4D．5DC5．有如下VB程序段：PrivateSubCommand1_Click()a＝Val(Text1.Text)Ifa>＝5Thenb＝a^3Elseb＝a*3EndIfText1.Text＝Str(b)EndSub若要测试所有分支程序代码是否正确，下列测试数据中最恰当的一组是()A．1,4B．8,12C．3,7D．5,15D6“．如果a能被b整除，那么x＝a＋b”。能实现该功能的VB语句是()A．Ifa\b＝0Thenx＝a＋bB．Ifa＝bThenx＝a＋bC．IfInt(...