第4章 循环结构程序设计 (2)

《第4章 循环结构程序设计 (2)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第4章循环结构程序设计本章内容循环结构用For-Next语句实现循环结构用While语句实现循环结构用Do语句实现循环结构嵌套的循环结构循环结构以重复执行s=s+2为例，用所有语句描述。区别循环次数确定与不确定的循环；当型与直到型循环用For-Next语句实现循环结构语句形式：For循环变量=初值to终值[Step步长][循环体][ExitFor][循环体]Next循环变量2．语句说明：循环变量必须为数值型。当步长为正时，初值小于终值，反之初值大于终值；步长缺省时为1。循环体由一条或多条语句组成。执行到ExitFor语句时退出循环，执行For语句的下一语句。循环次数：这里i

2、nt为取整。用For-Next语句实现循环结构用For-Next语句实现循环结构语句执行过程：用For-Next语句实现循环结构【实例4.1】求1+2+3+……+n的和。窗体界面如图4-2实例4.1编写代码分析求1+2+3+……+100和的过程可以描述如下：Sum=Sum+1Sum=Sum+2Sum=Sum+3……Sum=Sum+100Sum=Sum+jj=1，2，……100Fori=1tonSum=Sum+jNextiFori=1tonSum=Sum+iNexti实例4.1编写代码“计算”按钮完整代码:PrivateSubcmdcal_Click()DimiAsInteg

3、er,sumAsLong,nAsLongn=Val(txtn.Text)Fori=1Tonsum=sum+iNextitxtsum.Text=sumEndSubFori=1To100step2sum=sum+iNextiFori=1To50sum=sum+2*i-1NextiFori=2To100step2sum=sum+iNexti实例4.1编写代码“计算结果”框架中的标签（labn）内容随输入值变化的代码：PrivateSubtxtn_Change()labn.Caption="1+2+3……+"&txtn.TextEndSub1*2*3……*100PrivateSub

4、cmdCal_Click()DimFacAsIntegerDimiAsIntegerFac=1Fori=1To100Fac=Fac*iNextilblSum.Caption=FacEndSub?1！+2！+3！+……+15!PrivateSubcmdCal_Click()DimFacAslong,sumAslongDimiAsIntegerFac=1Fori=1To15Fac=Fac*isum=sum+FacNextilblSum.Caption=sumEndSub用While语句实现循环语句形式：While条件[循环体]Wend语句说明：“条件”一般为条件表达式，结果为布

5、尔变量True或False。“条件”用于控制“循环体”是否执行。多用于循环次数不定的情况。用While语句实现循环语句执行过程：用While语句实现循环PrivateSubcmdCal_Click()DimsumAsInteger：DimiAsIntegeri=1:sum=0whilei<=100sum=sum+ii=i+1wendlblSum.Caption=sumEndSubFori=1To100Step1sum=sum+iNexti用While语句实现循环【实例4.2】实现1*2*3*……*n的操作，当阶乘值>5000时结束操作。实例4.2编写代码PrivateSub

6、cmdcal_Click()DimiAsInteger，facAsLongi=1fac=1Whilefac<=5000fac=fac*ii=i+1txtcyc.Text=itxtfac.Text=facWendEndSub用do语句实现循环语句形式1：Do[While或Until条件][‘满足某条件时ExitDo][语句体]Loop用do语句实现循环语句形式2：Do[语句体][‘满足某条件时ExitDo][语句体]Loop[While或Until条件]用do语句实现循环用do语句实现循环PrivateSubcmdCal_Click()DimsumAsInteger：Dimi

7、AsIntegeri=1:sum=0DoWhilei<=100sum=sum+ii=i+1LooplblSum.Caption=sumEndSubDo–LoopWhile语句编写代码PrivateSubcmdCal_Click()DimsumAsInteger：DimiAsIntegeri=1Dosum=sum+ii=i+1LoopWhilei<=100lblSum.Caption=sumEndSub用DO语句实现循环例5计算之和。….补充例题产生m个1~100之间的随机数，求出其中的最大值、最小值和平均值。窗体设