用WHILE…WEND实现循环遇到WHILE语句时，先对“条件”求值，判断条件为“真”或“假”；如果条件为“真”，则运行WHILE与WEND之间的语句，然后再检查上述条件是否为“真”，如果为“真”，则再次运行WHILE与WEND之间的语句。以上过程反复进行到某一次条件为“假”；如果条件为“假”，则不执行WHILE与WEND之间的语句，直接跳到WEND出出口，脱离循环，接着执行WEND之后的语句。例：计算N！（即求1×2×3×…×N）INPUT“n=”;nm=1p=1WHILEp<=nm=m*Pp=p+1WENDPRINT“m=”;mEND运行结果为：n=?5m=120即5！=120用DO…LOOP结构实现循环(1)DOWHILE条件循环体LOOP带WHILE子句循环举例(1)带WHILE子句循环举例(2)带WHILE子句循环举例(3)QBASIC保留WHILE-WEND循环主要是为了与GW-BASIC或BASICA兼容。下面两个程序的作用相同。程序运行输出结果均为：s=1683n=33DOUNTIL条件循环体LOOP带UNTIL子句循环举例FOR-NEXT循环结构FOR-NEXT循环结构执行过程FOR-NEXT循环结构举例(1)FOR-NEXT循环结构举例(2)CLSDIMaASINTEGER,bASINTEGER,cASINTEGERFORi=100TO999a=INT(i/100)b=INT((i-a*100)/10)c=i-INT(i/10)*10IFi=a*a*a+b*b*b+c*c*cTHENPRINTi,NEXTiPRINTEND关于FOR-NEXT循环结构的说明(1)⑥循环变量的作用主要是用来对循环进行控制，根据它的值决定何时终止循环过程。循环变量可以在循环体中被引用，也可以不在循环体中出现（参见：samp5-17.bas）。⑦在循环体内一般不要对循环变量再赋值，否则将影响原有的循环控制状况。⑧流程可以从循环体内转移到循环体外，但不能从循环体外转到循环体内。FORk=1TO10s=s+k*kIFs＞200GOTOa:NEXTka:PRINTkEND是合法的。但由于循环有两个出口，不符合结构化原则，故不提倡使用。FOR-NEXT循环结构举例(3)DIMaASINTEGER,bASINTEGER,iASINTEGERREMRANDOMIZERANDOMIZETIMERscore=0FORi=1TO10a=INT(90*RND)+10b=INT(90*RND)+10PRINTa;"+";b;"=“;INPUTcIFc=a+bTHENscore=score+10NEXTiPRINT"Yourscoreis:";scoreENDFOR-NEXT循环结构举例(4)基本要求