vb第6章 循环结构ppt课件.ppt

《vb第6章 循环结构ppt课件.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、6.1循环概述6.2For循环6.3While循环6.4Do循环6.5循环的嵌套6.6循环的退出第6章循环结构例如：计算1-100所有奇数的平方和。用顺序结构来实现：PrivateSubForm_Click()Dims&,x%s=0:x=1s=s+x^2x=x+2s=s+x^2x=x+2s=s+x^2……x=x+2'x的值累加到99s=s+x^2Print"1~100之间所有奇数的平方和=";sEndSub用循环语句解决上面的问题，程序非常简短：PrivateSubForm_Click()Dims&,x%s=0Forx=1T

2、o99Step2s=s+x^2NextxPrint"1~100所有奇数的平方和=";sEndSubVB提供了三种不同风格的循环语句，它们分别是：（1）For…Next语句（2）While…Wend语句（3）Do…Loop语句我们将对这三种循环语句逐一介绍>>>循环是指在指定的条件下多次重复执行一组语句。被重复执行的一组语句称为循环体。假真循环体循环条件5.2For循环1、格式：For循环变量=初值To终值［Step步长］［循环体］Next［循环变量］2、说明：（1）循环变量、初值、终值、步长——必须为数值型。（2）步长——增

3、量为正值:初值<=终值负值:初值>=终值。省略:则默认步长值为1。循环变量的增量①赋值②比较③执行④+步长循环变量赋初值循环变量超过终值?循环体循环变量加上一个步长TrueFalse①赋值②比较③执行④+步长3、流程图：第几次循环x与终值比较Forx=1To10Step3printx,NextxX为循环变量4、举例：11<1017104<10427<10310=10413>105停止分析:例:求S=1+2+3+…10，把结果显示在窗体上。累加器s=s+i旧值。前n项之和新加的数…s=s+i1+23s=s+i1+2+…910s

4、=s+i12s=0Fori=1To10s=s+iNextiPrint"s=";s'累加器初值为0'累加器，在原有和的基础上每次加一个数程序执行结果是：s＝55分析:s=s+i01第一次循环第二次循环第三次循环第十次循环i=2i=3i=4i=11i=1i<=10i<=10i<=10i<=10i>10退出循环5、注意：1）For循环语句是“先判断后执行”。2）For语句和Next语句必须成对出现，缺一不可。3）每次循环，循环变量的值都会发生变化。当退出循环后，循环变量的值保持退出时的值。4）循环次数计算公式为：循环次数=Int（

5、（终值-初值）/步长）+1分析：计算结果：s=0Fori=1To99Step2s=s+i^2NextiPrint“s=”;s循环次数：退出循环后，循环变量i的值：S=12+32+52+…+992=166650Int((99-1)/2)+1=50101例6.1:求N！（N为自然数）分析：由阶乘的定义，我们可以得出N！=1*2*…*(N-2)*(N-1)*N=(N-1)！*N，也就是说，一个自然数的阶乘，等于该自然数与前一个自然数阶乘的乘积。将下列程序补充完整：PrivateSubForm_Click()Dimn%,i%,f#n

6、=Val(InputBox("输入一个自然数：","输入提示",“5"))…Printn;"!=";fEndSub例6.2:判断用户输入的数是否为素数。分析：素数的特征是只能被1和它自身整除。技巧：假设用户输入的正整数为n，我们只需确定在大于1小于等于的正整数中是否存在能整除n的数。如果有，则n就不是素数；如果没有，则n就是素数。例如：1517[2,3][2,4]程序如下：PrivateSubForm_Click()Dimn%,i%,k%,flag%n=InputBox("请输入一个正整数（≥3）")EndSubk=Int(

7、Sqr(n))flag=0Fori=2tokIfnmodi=0thenflag=1NextiIfflag=0thenprintn;”是一个素数”Elseprintn;”不是一个素数”EndIfFort=1To3Ift<=1Thena=3Ift<=2Thena=2Ift<=3Thena=1Printa;NexttPrinttA.3333B.1234C.3214D.1114例6.3下列程序的运行结果是？想一想思考题D6.3While循环前面我们介绍了For…Next循环，它适合于解决循环次数事先能够确定的问题。对于只知道控制条件

8、，但不能预先确定需要执行多少次循环体的情况，我们可以使用While循环。1、格式：While条件[循环体]WendWhile语句执行流程3、流程图：当“条件”为True时，执行循环体，当“条件”为False时，不执行循环体。因此While循环也叫当型循环。2、说明：阅读些列程序段：x=1W