vb教程第5章教案

vb教程第5章教案

ID:36318230

大小:505.00 KB

页数:54页

时间:2019-05-09

vb教程第5章教案_第1页
vb教程第5章教案_第2页
vb教程第5章教案_第3页
vb教程第5章教案_第4页
vb教程第5章教案_第5页
资源描述:

《vb教程第5章教案》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、第5循环结构程序设计计算机具有速度快、精度高的特点,特别适于进行重复性的工作,重复次数越多越能显示它的威力。所以,使用计算机时,应尽量把问题归纳为简单而有规则的重复运算和操作,以充分发挥计算机的特长。采用循环程序可以解决一些按一定规则重复执行的问题。例如,统计一个班几十名学生,甚至全校几千名学生的学期成绩,如求平均分、不及格人数等本章主要内容第5章循环结构程序设计Do...LoopFor...Next退出循环出口语句(Exit)循环语句多重循环列表框与组合框常用算法程序举例循环是指在指定的条件下多次重复执

2、行一组语句被重复执行的一组语句称为循环体VB提供的循环语句有For...NextDo...LoopWhile...WendForEach...Next最常用的是For...Next和Do...Loop语句假真循环体循环条件For...Next循环主要是用在知道循环次数的情况下;若事先不知道循环次数,可以使用当型循环Do...Loop1.For...Next循环语句(计数控制)For循环变量=初值To终值[Step步长值]循环体Next循环变量2.DoWhile...Loop语句(条件控制)Do[{Whi

3、le

4、Until}条件]循环体Loop5.1循环语句示例求S=1+2+3+…+8s=0Fork=1To8s=s+kNextkPrint"s=";s程序运行结果如下:s=36n=1:s=0DoWhilen<=8s=s+nn=n+1LoopPrint"s=";s例5.2K为循环变量专设变量n来控制循环例5.2求S=1+2+3+…8,把结果显示在窗体上。s=0'累加器初值为0Fork=1To8s=s+k'累加器,在原有和的基础上每次加一个数NextPrint"s=";s程序执行结果是:s=36分析累加器s=s

5、+k旧值。前n项之和新加的数k=1s←s+k01k=3s←s+k1+23k=2s←s+k12k=8s←s+k1+2+…78……算法:通常采用重复运算来解决问题累加、累乘等如用级数π/4=1-1/3+1/5-1/7+……来求π设置循环变量使每次运算变量值有所不同控制循环计数控制或条件控制循环结构程序的实现求S=1+2+3+…+8s=0Fork=1To8s=s+kNextkPrint"s=";s把长式子改为8次加采用Print直接在窗体上输出结果,程序代码:PrivateSubForm_Load()Showt

6、=1Forc=1To8t=t*cNextcPrint"T=";tEndSub程序运行结果是:T=40320语句t=t*c称为乘法器。先将t置1(不能置0)。 在循环程序中,常用累加和累乘来完成各种计算任务例5.3求T=8!=1×2×3×…×8例5.3例5.3T=8!=1×2×3×…8,把结果显示在网页上。t=1'累乘器初值为1Forc=1To8t=t*c'累乘器,在原有积的基础上每次乘一个数NextPrint"T=";t程序执行结果是:T=40320分析c=1t←t*c11c=3t←t*c1*23c

7、=2t←t*c12c=8t←t*c1*2*…78……累乘器t=t*k旧值。前n项之积新乘的数采用Print直接在窗体上输出结果,程序代码如下:PrivateSubForm_Load()ShowDimpiAsSingle,cAsInteger,sAsIntegerpi=0s=1's表示加或减运算Forc=1To10000Step2pi=pi+s/cs=-s'交替改变加、减号NextcPrint"π=";pi*4EndSub程序运行结果是:π=3.141397例5.4用π/4=1-1/3+1/5-1/7+…

8、…级数求π的近似值(取前5000项来进行计算)例5.4Fort=1To3Ift<=1Thena=3Ift<=2Thena=2Ift<=3Thena=1Printa;NexttPrinttA.3333B.1234C.3214D.1114下列程序的运行结果是?想一想思考题DFort=1To3Ift>=1Thena=3Ift>=2Thena=2Ift>=3Thena=1Printa;NexttPrinttA.3334B.1234C.3214D.1114下列程序的运行结果是?想一想思考题C运行下面程序后,循环体执

9、行了______次。i=0:n=1DoWhilei<32i=(i+1)*(i+1)n=n+1LoopPrintnA.2B.3C.4D.5请回答问题想一想思考题Cs="ABCDEFGHIJ":c=""Fork=2ToLen(s)Step3a=Mid(s,k)c=c+Left(a,1)NextkPrintcA.BDFB.CFIC.BEHD.BEI下列程序的运行结果是?想一想思考题C采用DoWhile...Loop语句采用Print

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。