DO-While--Loop循环语句.ppt

单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,Do_While-Loop,循环语句,在,VB,中，通常可以使用如下两种类型的循环语句：,ForNext,语句,：,适合处理,循环次数预知,的循环问题。,DoLoop,语句,：,适合处理可以用,某种条件,进行控制的循环问题。,Do While-Loop,循环语句,Do While,溶液的,PH,值大于,4,向溶液中加入一滴硫酸,Loop,条件,循环语句,Do While,Loop,Do,语句的格式有多种，常用的,Do,语句格式如下：,上面的,Do,语句的执行过程是：先计算条件表达式的值，如果值为,True,，则执行一次循环体中的语句块，遇到,Loop,语句后，再次计算条件表达式的值，若仍为,True,，继续执行循环体中的语句块，如此不断重复，直到条件表达式的值为,False,时，才终止,Do,语句的执行，其执行过程如下图所示。,首先判断条件是否成立，若,条件成立，则执行循环语句,。遇到,Loop,语句后，再次判断条件是否成立，若成立，继续执行循环语句，如此,不断重复,，当,条件不成立时，则终止,Do,语句的执行。,Dim S As Integer,I As Integer,S=0,I=0,Do,While I=100,S=S+I,I=I+1,Loop,Print“s=,S,否,是,输出,s,i=100?,i=i+1,i=1,开始,结束,s=0,s=s+i,S=0,For I=1 to 100 Step 1,S=s+I,Next I,Print “s=”s,例题 用,Do,语句计算,1+100,分析问题，得出答案,Private Sub Command1_Click,（）,Dim S as Integer,，,M as Integer S=0 M=1 Do While M=10 S=S+M,_,Loop Print s,End Sub,M=M+1,说明：划线处代码是,M=M+1,，每执行完一次循环，,M,都增加,1,。在这个程序中，此语句十分重要，如果缺少，就会出现条件,M=10,永远成立的情况，程序将会无限地循环。因此在使用,Do,语句时，必须注意条件表达式中的,变量值的变化方式,，有可能会出现无限循环的情况。,用,Do,循环语句编写求,s=1+2+3+10,的程序，将划线处补充完整。,分析并完善程序,a=1:b=0,do while a=3,a=a+1,b=b+a*a,Loop,print a,b,运行的结果是,_,4,29,分析并完善程序,已知,S=1+2+3+.+N,，找出一个最大的整数,N,，使得,S300.,S=0,N=0,Do While _,N=N+1,S=S+N,_,N=N-1,print“,最大整数,N,为：”,;N,S300,Loop,知识回顾,Knowledge Review,三、举一反三,变,1,：分别用当型和直到型语句编写计算机程序来计算,1+3+,+99,的值。,思考：编写计算机程序来计算,1,2,+3,2,+,+99,2,的值。,变,2,：编写一个程序，输入正整数,n,，计算它的,阶乘,n!(n!=n*(n-1)*,*3*2*1),。,