第4章 循环结构程序设计(二)ppt课件.ppt

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

1、第4章循环结构（二）4.1.1For…Next循环格式：For<循环变量>＝<初值>To<终值>[Step<步长>]语句块[ExitFor]语句块Next<循环变量>4.1.2While…Wend循环格式：While条件循环体Wend循环初始状态循环条件循环体TF形式2：Do语句块[ExitDo语句块]Loop{While

2、Until}<条件>4.1.3Do…Loop循环形式1：Do{While

3、Until}<条件>语句块[ExitDo语句块]Loop4引例密码验证ss=“111”Form1.HideMsgBo

4、xForm1.ShowMsgBox:2TFss=“111”MsgBoxForm1.ShowMsgBox:1TF…ss=“111”Form1.HideMsgBoxForm1.ShowMsgBox:2TFss=“111”MsgBoxForm1.ShowMsgBox:1TFss=“111”MsgBoxForm1.ShowMsgBox:0TFForm1.Hidess=“111”MsgBoxForm1.ShowMsgBox:2TFForm1.Hidess=“111”MsgBoxForm1.ShowMsgBox:2TFi<

5、=3i=1i=i+1ss=“111”Form1.HideMsgBoxForm1.ShowTFss=“111”MsgBoxForm1.ShowMsgBox:0TFMsgBox:2ss=“111”MsgBoxForm1.ShowMsgBox:1TF实例4－1累加PrivateSubCommand1_Click()DimiAsInteger,sumAsLong,nAsLongn=Val(Text1.Text)Fori=1Tonsum=sum+1NextiText2.Text=sumEndSubsum=sum+i缩进格

6、式PrivateSubCommand1_Click()DimiAsInteger,sumAsLong,nAsLongn=Val(Text1.Text)Fori=1Tonsum=sum+iNextiText2.Text=sumEndSub实例4－2累乘说明：1、本程序仅用来计算积<=5000的累乘值，要求n!怎么办?要求用While循环。2、自动计算与手动计算结果不一致，为什么？怎么改？3、手动计算中的窗体级变量。DimjAsInteger,factAsLongPrivateSubCommand2_Click()

7、Ifj=0Thenfact=1Iffact<=5000Thenj=j+1fact=fact*jtxtcyc.Text=jtxtfac.Text=factElseCommand2.Enabled=FalseEndIfEndSub手动计算PrivateSubCommand1_Click()DimiAsInteger,facAsLongi=1fac=1Whilefac<=5000fac=fac*ii=i+1txtcyc.Text=itxtfac.Text=facWendEndSub自动计算说明：1、本程序仅用来计算积

8、<=5000的累乘值，要求n!怎么办?要求用While循环。2、自动计算与手动计算结果不一致，为什么？怎么改？3、手动计算中的窗体级变量。i=10且<=99随机数，并依次显示出来m=Val(Text1)DoRandomize‘本语句可使下面的r，每次产生不同的随机数r=Int(Rnd*90+10)Lblrnd=Lblrnd+""+Str(r)n=n+1Fori=2Tor–1‘判断素数IfrModi=0ThenExitForNe

9、xtiLoopWhilen=rThen‘统计信息Ifr>MaxThenMax=r…EndIf循环中容易出的问题：死循环循环体的正常运行一般通过循环体中对循环变量的改变来控制对循环条件的判断，使得循环能够终止循环初始状态循环条件循环体TF如果某变量控制的不好，则可能造成永远无法终止循环的情况称之为“死循环”死循环S=0i=1i<=50S=S*2i=i-1TFS=0i=1i<=50S=S*2i=1TFS=0i=1i<=50S=S*2TF正确循环的规律ixTFi不断减小4.1.4循环

10、的嵌套在一个循环体内又包含了一个完整的循环结构称为循环的嵌套或多重循环。外部的循环称为外循环，内嵌的循环称为内循环。PrivateSubForm_Click()Forx=1To5Fory=1To5Printy;NextyPrintNextxEndSub实例4－4：图形输出16内循环变量与外循环变量不能同名；外循环必须完全包含内循环，不能交叉；不能从循环体外转向循环体内，反之则可以。Fo