块IF语句比行IF语句功能更强，适应面更广，它能够通过IF—THEN—ELSE、IF—ELSE—END IF结构实现任意多个分支，并从任意多个分支中选择其中一个分支执行。块IF语句至少占用两个语句行。 3.2.1 块IF语句格式 当THEN部分和ELSE部分包含比较多的内容，需执行多个语句时，用行IF实现选择结构，在一行内就难以容纳，而且程序读起来也不清晰。QBASIC提供的“块IF”结构，即是一将一个选择结构用若干个语句来实现。 块IF的一般格式如下： IF＜条件>THEN [<语句组1>] ELSE [<语句组2>] END IF 关于块 IF结构的说明如下： （1）执行块IF时，先判断所给的条件是否满足：如求出逻辑表达式的值为真，条件满足，则执行语句组1，然后跳过ELSE行和语句组2，由END IF出口；如果逻辑表达式为假，条件不满足，则跳过THEN部分，执行ELSE部分的语句组2，然后由END IF出口。 （2）语句组1和语句组2可以包含多个语句行。 （3）ELSE部分是任选的，即此部分可有可无。例如： IF a > 8 THEN Print a End if 就无ELSE部分，也是合法的。 （４）IF－THEN必须写在一行上，THEN是该行的行尾，但是“语句组１”不能与IF－　THEN写在同一行上。如下面程序的写法是错误的： IFa>8 THENPRINT a ELSE    PRINT “a<=8” END IF QBASIC 把第一行认为是一个完整的IF语句，不允许出现其它语句，如果像上面的书写方法，QBASIC语言系统则判断第一条语句为行IF语句，第二行的ELSE没有相应的IF与之配对而给出错误信息。 （5）<语句组1>和<语句组2>可以缺省。例如： IF b>0 THEN ELSE END IF 是合法语句，但无任何实际意义。 （6）ELSE和“语句组2”可以在一行上书写。例如： IF a>0 THEN ELSE PRINT a END IF 这样书写方法是合法的，但使用这种方法书写，程序看起来不清晰，容易出现错误，一般最好还是将ELSE独占一行为好。 （7）块IF结构IF—END IF是一个选择体，IF和END IF成对出现。<语句组1>或<语句组2>中都允许嵌套块IF结构，当出现嵌套层时，可用向内缩进若干列的方法，形成锯齿形排列的形式，以便于了解层次关系。 【例3.4】将任意3个整数按由大到小进行排列。 解：设三个整数位a,b,c。第一先将a与b比较，a>b则a是大数不交换，ac则a是大数不交换，a< p=""> 再将b与c比较，b>c则不交换，b< p=""> 经过比较由大到小的顺序已排好。程序的NS图如图3.7所示。 程序如下： INPUT“a,b,c=”;a,b,c IF b>a THEN SWAP a,b END IF IF c>a THEN SWAP a,c END IF IF c>b THEN SWAP c,b END IF PRINT“a,b,c=”;a,b,c END 程序运行后，首先输入a,b,c a,b,c=？9,5,10 程序运行结果为： a,b,c=10  9  5   在程序中使用了两变量的交换语句SWAP语句，使得程序减少了许多重复的赋值语句。 3.2.2 块IF的嵌套及ELSE IF的使用 1、块IF的嵌套 在块IF语句中，每个语句允许组包含任何语句，当然也可以包含块IF语句。如果一个快IF语句完全包含在另一块IF语句的一个语句组中，就称为块IF语句的嵌套。块IF语句的嵌套可表示为如下的一般形式： IF…THEN    IF…THEN    ELSE     ：    END IF ELSE ：     IF…THEN      ：     ENDIF ： END IF 【例3.5】编写一个程序，使用户能输入月份，根据给出的年份和月份判断该月有多少天。 INPUT  “Enter year”;y INPUT  “Enter month(1-12)”;m IF (m=4) OR (m=6)OR (m=9) OR (m=11) THEN   day=30 ELSE IF(m=1) OR (m=3) OR (m=5) OR (m=7) OR (m=8) OR (m=10) OR (m=12) THEN       day=31     ELSE IF(Y MOD 4=0  AND Y MOD100<>0)OR(Y MOD 4=0  AND Y MOD 400<>0)THEN        day=29        ELSE        day=28        END IF     END IF END IF PRINT “There are”;day;”daysin the month entered” END 该程序根据输入的年、月份求出该月的天数day，程序使用了块IF的结构嵌套。用户使用嵌套方法时应注意IF-END IF的配合出现，假设不是成对出现，系统将作出错误处理。 2、块IF语句中使用ELSE IF 使用 ELSE IF的块IF结构的一般格式为：       IF <</strong>条件1> THEN         <</strong>语句组1>       ELSE IF<</strong>条件2> THEN         <</strong>语句组2> ELSE IF<</strong>条件3> THEN         <</strong>语句组3> ： ELSE IF<</strong>条件n> THEN     <</strong>语句组n> ELSE <</strong>语句组n+1> END IF 当条件1满足执行语句组1，若条件1不满足而满足条件2则执行语句组2；若条件1和条件2都不满足而满足条件3，则执行语句组3……若条件1到n都不满足，则执行语句组n+1.只要执行完某一个语句组即跳到END IF退出块IF结构。 INPUT  “Enter year”;y INPUT  “Enter month(1-12)”;m IF (m=4) OR (m=6)OR (m=9) OR (m=11) THEN   day=30 ELSE IF(m=1) OR (m=3)OR (m=5) OR (m=7) OR (m=8) OR (m=10) OR (m=12) THEN       day=31 ELSE IF(Y MOD 4=0 AND Y MOD 100<>0)OR(Y MOD 4=0  AND Y MOD 400<>0)THEN        day=29     ELSE        day=28 END IF PRINT “There are”;day;”daysin the month entered” END

--end--

声明：本文章由网友投稿作为教育分享用途，如有侵权原作者可通过邮件及时和我们联系删除：freemanzk@qq.com