VB教程---循环结构

《VB教程---循环结构》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、循环结构在VisualBasic程序的三种结构中,循环结构是一种重要结构。循环的本质：不断地重复某种动作。对计算机程序而言，循环必须具备两个重要因素：1.在一定的条件下，重复执行一组语句2.必然出现不满足条件的情况，使循环终止思考题编写程序实现计算：0+1+2+3+4+…+n的值前后两项之差都为1，是一个等差数列Sum=0Sum=sum+1Sum=sum+2Sum=sum+3…Sum=sum+nSum=sum+ii=i+1i是从1到n递增1的数列重复执行n次一、循环程序设计结构VB中提供了两种类型的循环语句：一种是计数循环语句

2、；另一种是条件循环语句。VisualBasic支持的循环结构有：☆For...Next结构☆Do…Loop结构☆While…Wend☆goto重点掌握：Do…Loop、For.Next、While…Wend等前三种循环1、For…Next循环结构循环体ExitFor循环体循环变量增加步长循环变量获得初值FT循环变量在终值内For循环的执行过程语法格式：For循环变量=初值To终值[Step步长]<循环体>[ExitFor]<循环体>Next[循环变量]记住了编程计算：S=1+2+3+…+100DimS%,i%S=0Fori=1

3、to100S=S+iNextiPrinti，S思考:求100以内的奇数和、偶数和怎样改程序？求10！怎样改程序？注意执行过程！！循环结束后循环变量i的值为多少说明①格式中的参数说明：循环的初值、终值和步长都是数值表达式，其值不一定是整数，可以是实数。增量参数可正可负。如果增量为正，则初值必须小于等于终值，否则不能执行循环体内的语句；如果增量为负，则初值必须大于等于终值。如果没有设置step，则增量默认为1。当初值等于终值时，不管步长是正数还是负数，都执行一次循环体。②循环次数由初值、终值和步长决定，计算公式为：循环次数

4、=INT（（终值–初值）/步长+1）③For语句和Next语句必须成对出现，不能单独使用。Next是循环终端语句，在Next后面的循环变量与For中的循环变量必须相同。当循环是单层循环时，Next后面的循环变量可以不写。④如果要在循环变量到达终值前退出循环，可用ExitFor语句来实现。该语句可以在For循环中出现多次，且位置不限。如：前例中加入条件“当sum超过400时跳出循环”。Fori=1to500step100S=S+IIfs>400thenExitforNextiPrinti,S2、Do…Loop循环结构Do…L

5、oop循环用于事先不知道循环次数的循环结构。此种语句四种语法格式：⑴.DoWhile…Loop语句先判断条件值，如果为真，执行循环体，否则退出⑵.DoUntil…Loop语句先判断条件值，如果为假，执行循环体，直到为真时退出⑶.Do…LoopWhile语句先执行循环体，后判断条件值，为真继续循环，否则退出⑷.Do…LoopUntil语句先执行循环体，后判断条件值，为假继续，直到为真退出⑴.DoWhile…Loop语句DimS%,i%S=0Fori=1to100S=S+IIfs>400thenExitforNextiPrint"

6、S=",SDimS%,i%S=0i=1Dowhiles<=400S=S+ii=i+1LoopPrint"S=",S语法格式：DoUntil〈条件表达式〉〈循环体〉[ExitDo]〈循环体〉Loop(2)DoUntil…Loop语句语法格式：DoWhile〈条件表达式〉〈循环体〉[ExitDo]〈循环体〉LoopDimS%,i%S=0i=1Dountils>400S=S+ii=i+1LoopPrint"S=",S说明：①条件表达式可以是一个逻辑表达式，也可以是一个关系表达式，其值应是逻辑型。②DoWhile/Until和Loop

7、应成对出现。③循环体中要有控制循环的语句，以避免出现死循环。④由于该循环的特点是先判断条件，然后再决定是否要执行循环体里的语句。所以，这种循环可以一次也不执行循环体。⑤ExitDo表示当遇到该语句时，强制退出循环，执行Loop后的下一条语句注意：①至少要执行循环体一次。②与DoWhile循环的区别：DoWhile循环先测试条件是否成立，只有成立才执行循环；而该循环先执行循环体，后测试条件是否成立。（3）Do…LoopWhile语句⑷.Do…LoopUntil语句语法格式：Do〈循环体〉[ExitDo]〈循环体〉LoopUnti

8、l〈条件表达式〉语法格式：Do〈循环体〉[ExitDo]〈循环体〉LoopWhile〈条件表达式〉例：输入有效位数，按下述公式计算圆周率∏的有效值。m=val(text1.text)pai=2:p=0Dot=s:p=spr(2+p):pai=t*2/pLoopUntilabs