[分享]QB5

pop

在程序设计(I)中讲到了循环语句FOR NEXT的用法,这次我在往深的讲一点.

1.FOR循环的多重嵌套

多重嵌套就是FOR NEXT循环体中有嵌套一个新的FOR NEXT循环体,注意不允许中间的循环体,超出外部的循环体.

格式:

FOR I

FOR J

NEXT J

NEXT I

或者

FOR A

FOR B

NEXT B

FOR C

NEXT C

FOR D

NEXT D

NEXT A

错误的格式:
FOR A

FOR B

NEXT A

NEXT B

　　注意FOR NEXT必须对应,如果在循环体内使用GOTO语句,只能从内层循环转向外层,不允许从外层转向内层.

　　在前面的程序设计(I)中有FOR NEXT循环嵌套使用例子,可以重新再看一看.

2.WHILE…WEND语句

　　FOR NEXT循环一般用于知道循环次数的循环,,而有些不知道循环次数的循环就需要使用WHILE…WEND循环.

格式:

WHILE <条件>

<语句串>循环体

WEND

只要条件为真就执行循环体,知道条件为假的时候退出循环,执行WEND后的语句.

设计一个累加的程序,直到累加的和超过1000,停止累加,显示累加和.

[例子]在QB中输入以下程序：

CLS
WHILE s <= 1000
INPUT a
s = s + a
WEND
PRINT s
END

3.DO…LOOP语句

格式:

DO WHILE<条件> <语句串> LOOP	DO UNTIL<条件> <语句串> LOOP	DO <语句串> LOOP WHILE<条件>	DO <语句串> LOOP UNTIL<条件>
条件真,执行循环语句串,否则执行LOOP下的语句.	条件假,执行循环语句串,否则执行LOOP下的语句.	条件真,执行循环语句串,否则执行LOOP下的语句.	条件假,执行循环语句串,否则执行LOOP下的语句.

注意如果要强制退出循环,可以假如EXIT DO,或者GOTO.

如果不清楚可以自己写几个程序来帮助理解.