07+Visual+Basic控制结构.ppt

第七章VisualBasic控制结构,7.1选择控制结构,7.2多分支控制结构,7.3For循环控制结构,7.4当循环控制结构,7.6多重循环,7.7GoTo语句,7.5Do循环控制结构,7.6多重循环,结构化程序设计的基本控制结构有三种，即顺序结构、选择结构和循环结构。由这三种基本结构还可以派生出“多分支结构”，即:根据给定条件,从多个分支路径中选择执行其中的一个。前面编写的一些简单的程序（事件过程）大多为顺序结构，即整个程序按书写顺序依次执行。在本章中，将讨论顺序结构之外的流程控制语句，包括选择结构、多分支结构及循环结构语句。掌握了这些语句，就可以编写较为复杂的程序了。,在VisualBasic中，有些问题需要通过程序的选择结构来解决，而选择结构是通过条件语句来实现的。条件语句也称为If语句，它有两种格式，一种是单行结构，一种是块结构。,7.1.1(1)单分支条件结构（If.Then语句）,用If.Then结构有条件地执行一个或多个语句。单行语法和多行块语法都可以使用：（1）IfThen（2）IfThenEndIf下面两个例子等价：（1）IfC为True时,要执行多行代码，则必须使用多行块If.Then.EndIf格式。在上述格式中，“条件”是一个逻辑表达式。程序根据表达式的值（True或False）执行相应的操作。,注意：一个行If语句只能占一个程序行，即要求在一行中写完的If语句。此语句的总字符数不能超过255。“条件”可以是逻辑表达式或关系表达式，或是一个逻辑量。条件成立，即逻辑值为真，则执行Then后的，执行完后，直接执行EndIf的后继语句；条件不成立，即逻辑值为假，则直接执行EndIf的后继语句。也就是说根据所给的条件成立与否，决定执行不同的内容。其中：可以是一条语句，也可以是多条语句，当两条以上的语句，位于同一行时，语句之间用冒号(:)分开。If（X0）And(Y0）And（YD）ThenAmount（XYD*2）/2：Try.Text=Str$(Amount)EndIf,7.1.1(2)双分支结构（If.Then.Else语句）可以用If.Then.Else.语句定义若干个语句块，但只能执行其中的一个语句块。其语法格式也有两种形式：（1）IfThenElseEndIf（2）IfThenElse当为真时，执行Then后面的语句块1（或语句1），否则执行Else后面的语句块2（或语句2）。它的功能是：若“条件”为True，则执行，否则执行，条件语句中的和还可以是条件语句，即条件语句可以嵌套，其深度（嵌套层数）没有具体规定，但受到每行字数（1024）的限制。,功能：二分支选择结构是根据给定的条件成立与否，来决定执行，还是执行。与前不同的是将一个选择结构用若干条语句行来实现。与行If语句类似，执行块If语句，先判断条件是否成立。条件成立，执行,执行完后，跳过Else行和，直接执行EndIf语句的后继语句；条件不成立，则执行，执行完后，直接执行EndIf语句的后继语句。其中：Else可以被省略。或中可以包含多条语句行。称为Then块。称为Else块。Then块、Else块中还可以嵌套其它块If语句。If-Then必须写在同一行上，Then是该行的结尾，语句组1不能与If-Then写在同一行上。为清晰起见，Else独占一行为好。块If结构以If-Then开始，以EndIf结束，作为选择结构它是一个整体。,7.1.2(1)多分支结构（IfThenElseIf语句）多分支结构可以处理两个或两个以上分支。其语句形式为：IfThenElseIfThenElseEndIfVisualBasic首先测试。若它为False，VisualBasic就测试，依次类推，直到找到一个为True的条件。当它找到一个为True的条件时，VisualBasic会执行相应的语句块，然后执行EndIf的后继语句。多分支结构一般包含Else语句块，若条件均不是True，则VisualBasic执行Else后的语句块。,执行的过程是这样的：从If开始判断，条件1成立，执行，执行完后，跳过其它语句，顺序执行EndIf的后继语句，若不成立，再顺序判断是否成立，若成立，则执行ElseIf后的，执行完后，顺序执行EndIf的后继语句，若条件不成立，则顺序往下，以此类推，当所有的条件都不满足，则执行Else后的,执行完后，顺序执行EndIf的后继语句,若所有的条件都不满足，又未选Else后的，则顺序执行EndIf的后继语句。,7.1.2(2)If语句的嵌套掌握了If语句的基本形式，可以通过这些基本形式加以复合，获得更为复杂的If结构，称为If语句的嵌套。一般形式如图1所示。图2为在Else块中嵌套If结构的形式。可根据实际情况选择采用何种结构。,图1If语句复合结构的一般形式,图2在Else块中嵌套If结构的形式,IfThenIfThenIfThenElseEndIfElseEndIfElseEndIf,IfThenElseIfThenElseIfThenElseIfThenElseEndIfEndIf,与前面的程序比较，可以看出：程序的结构是相同的，但表达的方式不同，用ElseIf语句可以减少程序的行数，省去各层块If结构中的EndIf行，运行结果与前相同。但程序看起来比较清晰。在内嵌If层次较多时，常用ElseIf语句。,在多个Else和多个Then语句之间应该怎样配对呢？VisualBasic规定：每一个Else部分都与它前面的、距它最近的、且未曾被配对的If-Then配对。例：IfThenIfThenElseElse内层IfThenIfThenElseIfThenElse内层中层外层在这部分，使用者应十分细心，以免出错。,7.1.3条件函数,1IIf函数IIf函数的功能是根据表达式的值，来返回两部分中的其中一部分。其语法格式为：IIf(,)例如，求分段函数：函数值的语句可以简单地表示为：y=Iif(x=250,Is500注意：上述Case语句中指定的条件并不是250Xb或c$x$等，也可以是逻辑表达式，如abAndbc，不能写成a5000ThenExitForNextjNexti在执行上述程序时，如果“i*j5000”，程序将从内层循环中退出；如果外层循环还没有结束，则控制仍返回到内层循环中去。（10）ForNext中的循环体是可选项，当该项缺省时，ForNext执行空循环。利用这一特性，可以暂停程序的执行。当程序暂停的时间很短，或者对时间没有严格要求时，用ForNext循环来实现暂停是一个好方法。不过，对于不同的计算机，暂停的时间也不一样。当对一个语句序列执行固定次数的循环时，用ForNext循环非常方便。,7.4当循环控制结构在一定的条件下，物质可以由一种状态转化为另一种状态。例如，当温度降到以下时，水变成冰；当水温上升到100以上时，水变成水蒸汽。在VisualBasic中，描述这类问题使用的是当循环语句。其格式如下：While条件语句块Wend其中:“条件”为一布尔表达式。当循环语句的功能是：当给定的“条件”为True时，执行循环中的“语句块”（即循环体）。,While循环语句的执行过程是：如果“条件”为True（非零值），则执行“语句块”，当遇到Wend语句时，控制返回到While语句并对“条件”进行测试，如仍然为True，重复上述过程；如果“条件”为False，则不执行“语句块”，而执行Wend的后继语句。当循环与For循环的区别是：For循环中循环体执行的次数是已知的，而当循环则是在给定条件为True时,执行（循环体）。设有如下一段程序：Whileb0c=c+ab=b-1Wend,上述程序通过重复做加法来计算“c=c+a”，重复的条件是“b0”。每次执行循环体前，都要按While语句指定的条件（b0）判断一次。如果条件为True，则执行循环体中的语句块。也就是说，只要条件为True，则执行，执行完后,再测试条件是否成立，再执行，如此这般,直到条件为False（b=0）时才结束循环，控制转移到Wend的后继语句。这就是说，当循环可以指定一个循环终止的条件，而For循环只能首先确定循环的次数。因此，当需要由数据的某个条件是否成立来控制循环时，就不宜使用For循环，而应使用当循环来描述。对于循环次数有限但又不知道具体次数的操作，当循环是十分有效的。从某种程度上来说，当循环比For循环更灵活。,在使用当循环时，应注意以下几点：（1）While循环先对“条件”进行测试，然后才决定是否执行循环体，只有在“条件”为True时才执行循环体。如果条件从开始就不成立，则一次循环体也不执行。例如：Whileaa循环体Wend条件“aa”永远为False，因此不执行循环体。当然，这样的语句没有什么实用价值。（2）如果条件总是成立，则不停地重复执行循环体。例如：,x=1Whilex循环体Wend这是“死循环”的一个特例。程序运行后，只能通过人工干预的方法或由操作系统强迫其停止执行。（3）当循环开始时，对条件进行测试，如果成立，则执行循环体；执行完一次循环体后，再测试条件，如成立，则继续执行直到条件不成立为止。也就是说，当条件最初出现False时，或是以某种方式执行循环体，使得条件的逻辑值最终出现False时，当循环才能终止。在正常使用的当循环中，循环体的执行,应当能使条件改变，否则会出现死循环，这是程序设计中容易出现的严重错误，应当尽力避免。（4）当循环可以嵌套，层数没有限制，每个Wend和最近的While相匹配。,7.5Do循环控制结构Do循环不仅可以不按照限定的次数执行循环体内的语句块，而且可以根据循环条件是否成立（True或False），而决定是否结束循环。Do循环的格式如下：（1）DoWhile|Until循环条件语句块ExitDoLoop（2）Do语句块ExitDoLoopWhile|Until循环条件,1前测型Do.Loop循环在前测型Do.Loop循环中，只要为True就执行。其语法格式为：DoWhile|UntilLoop,说明：（1）Do、Loop及While、Until都是关键字。“语句块”是需要重复执行的一个或多个语句，即循环体。“循环条件”是一个逻辑表达式。（2）Do和Loop构成了Do循环。当只有这两个关键字时，其格式简化为：Do语句块Loop在这种情况下，程序将不停地执行Do和Loop之间的“语句块”。为了使程序按指定的次数执行循环，必须使用可选的关键字While或Until以及ExitDo。While是当条件为True时执行循环，而Until则是在条件为False时执行循环。和While循环一样，如果条件总是成立，Do循环也可能陷入“死循环”。在这种情况下，可以用ExitDo语句跳出循环体。一个Do循环中可以有一个或多个ExitDo语句，并且ExitDo语句可以出现在循环体中的任何地方。当执行到该语句时，结束循环，并把控制转移到Do循环的后继语句。用ExitDo语句只能从它所在的那个循环中退出。Do循环可以嵌套，其规则与For-Next循环相同。,2.后测型Do.Loop循环Do.Loop语句的另一种演变形式是先执行，然后在每次执行后测试。称为后测型Do.Loop循环。这种形式保证至少执行1次，其语法格式为：DoLoopWhile|Until,3.退出控制结构的出口语句1)ExitFor语句2)ExitDo语句3)ExitSub语句4)ExitFunction语句5）GoTo语句GoTo语句的语法格式为：GoTo标号|行号6）End语句7.6多重循环通常把循环体内不含有循环语句的循环叫做单层循环，而把循环体内还有循环语句的循环称为多重循环。例如在循环体内含有一个循环语句的循环称为二重循环。多重循环又称多层循环或嵌套循环。,7.7GoTo语句VisualBasic保留了GoTo型控制，包括GoTo语句和On-GoTo语句。尽管GoTo型控制会影响程序质量，但在某些情况下还是有用的，大多数语言都没有取消。1）GoTo语句可以改变程序的执行顺序，它跳过程序的某一部分去执行另一部分，或者返回已经执行过的某语句使之重复执行。因此，用GoTo语句可以构成循环。GoTo语句的一般格式为：GoTo标号|行号“标号”是一个以冒号结尾的标识符；“行号”是一个整型数，它不以冒号结尾。例如：Start：一个标号，而1200是一个行号。GoTo语句可以改变程序执行的顺序，无条件地把控制转移到“标号”或“行号”所在的程序行，并从该行开始向下执行。,说明：（1）标号必须以英文字母开头，以冒号结束，而行号由数字组成，后面不能跟冒号。GoTo语句中的行号或标号在程序中必须存在，并且是唯一的，否则会产生错误。标号或行号可以出现在GoTo语句之前，也可以出现在GoTo语句之后。当出现在GoTo语句之前时，提供了实现循环的另一种途径。（2）VisualBasic对GoTo语句的使用有一定的限制，它只能在一个过程中使用。（3）GoTo语句是无条件转移语句，但常常与条件语句结合使用。2）On-GoTo语句On-GoTo语句类似于情况语句，用来实现多分支选择控制，它可以根据不同的条件从多种处理方案中选择一种。其格式为：On数值表达式GoTo行号表列|标号表列On-GoTo语句的功能是：根据“数值表达式”的值，把控制转移到几个指定的语句行中的一个语句行。“行号表列”或“标号表列”可以是程序中存在的多个行号或标号，相互之间用逗号隔开。例如：OnxGoTo30，50，Line3