VB循环语句.ppt_第1页
VB循环语句.ppt_第2页
VB循环语句.ppt_第3页
VB循环语句.ppt_第4页
VB循环语句.ppt_第5页
已阅读5页,还剩5页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

4.3循环结构,循环:是在指定的条件下多次重复执行一组语句,1.For语句,2.Do语句,For循环变量=初值TO终值Step步长语句块Next循环变量,For循环格式:,执行过程:(1)将初值赋循环变量;(2)判断循环变量值是否小于等于终止值;(3)若是,执行循环体(语句块);(4)然后将变量增加一个步长;(5)重复24步骤。(6)否则,结束循环,1.Fornext循环,步长省略,默认为1,程序代码:Dimi,sAsIntegers=0Fori=1To10step1NextiPrintstr(i):Print(s),例1:求1+2+3+4+10之和.,分析:重复过程(循环体):ss+i初值、终值和增量:1、10、1,初值与终值换位可以吗?,循环体的执行次数是多少?输出的I、S的值是多少?ForI=1To10执行多少次?,s=s+i,Fori=10To1Step-1,2.Fornext循环,For循环变量=初值TO终值Step步长语句块Next循环变量,Dimi,sAsIntegers=0Fori=1To10s=s+iNextiPrintstr(i):Print(s),例3:求10!,分析:重复过程:*初值、终值与增量不变,例2:求1+2+3+4+10之和.,分析:重复过程(循环体):+初值、终值和增量:1、10、1,Dimi,sAsIntegerFori=1To10s=s*iNextiPrintstr(i):Print(s),s=1ForI=1To10,Fori=1To10s=1,3.Fornext循环,例:分析下列程序段的输出结果:DimIAsInteger,JAsIntegerJ=0ForI=0To10Step2I=I+3J=J+1NextI,注意:初值、终值、步长必须是数值型,步长为正,初值终值;缺省为默认为1在已知循环次数时使用For循环,循环次数=int(终值-初值)/步长)+1组成循环体的语句块可以是一条或多条语句退出循环后,循环变量保持退出时的值,4.Fornext循环,1.DoWhile循环体Loop,2.D0循环体LoopWhile,3.DoUntil循环体Loop,4.Do循环体LoopUntil,5.DoLoop循环,1.While循环,DoWhile循环体Loop,执行过程:(先判断,后执行)先判断循环条件,若为真:执行循环体,再判断循环条件否则,跳过循环体,执行Loop之后语句,6.DoLoop循环,DoWhile循环体Loop,Dimi,sAsIntegers=0Fori=1To10s=s+iNextiPrintstr(s),例1:求1+2+3+4+10的和.,Dimi,sAsIntegeri=1:s=0DoWhileLoopPrintstr(s),s=s+i,i=10,i=i+1,i=11,(1)循环体执行了几次?(2)没有I=1会怎样?(3)将Print语句移到Loop的前面结果怎样?(4)I先赋值为11,结果如何?,1.While循环,7.DoLoop循环,D0While循环体Loop,例2:s=1*3*5*7*n,找出最大整数n,使得s1000,1.While循环,8.DoLoop循环,Dimn,sAsIntegern=1:s=1DoWhiles1000n=n+2s=s*nLoopPrintstr(n),例2:s=1*3*5*7*n,找出最大整数n,使得s1000,练习1:我国现有人口13亿,按人口年增长率0.8%计算,多少年后我国人口超过26亿。,分析计算公式:26=13(1+0.008)n已知:当前人

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论