《VB【while循环课件】.ppt》由会员分享，可在线阅读，更多相关《VB【while循环课件】.ppt（15页珍藏版）》请在金锄头文库上搜索。
1、授课教师：杨丹,授课班级：1310班,While 循环体 Wend,while 循环语句的语法格式：,代码如下：,s = 0 i = 1 While i = 20 s = s + i i = i + 1 Wend Text1= s,流程图：,条件,循环体,代码如下：,s = 0 i = 1 While i = 20 s = s + i i = i + 1 Wend Text1= s,流程图：,条件,循环体,i=i+1,i=i+1,0,s=s+i,1,开始,i=20,结束,成立,不成立,开始,i=20,i=1,成立,1,s=s+i,2,i=2,代码如下：,s = 0 i = 1 While i
2、= 20 s = s + i i = i + 1 Wend Text1= s,流程图：,条件,循环体,1,3,开始,i=20,s=s+i,结束,成立,不成立,i=i+1,开始,i=20,s=s+i,i=i+1,成立,2,3,i=2,i=3,代码如下：,s = 0 i = 1 While i = 20 s = s + i i = i + 1 Wend Text1= s,流程图：,条件,循环体,190,210,开始,i=20,s=s+i,结束,成立,不成立,i=i+1,开始,i=20,s=s+i,i=i+1,成立,20,21,i=20,i=21,结束,不成立,For循环语句：,While 循环语句
3、：,代码：,代码：,?,?,任务一：,For循环语句：,While 循环语句：,代码：,代码：,s=0 For i = 1 To 100 Step 1 s = s + i Next i Text1= s,s=0 i =1 While i =100 s = s + i i = i + 1 Wend Text1= s,For循环语句：,While 循环语句：,代码：,代码：,?,?,(正解：X=14),For循环语句：,While 循环语句：,代码：,代码：,While s = 100 x = x + 1 s = s + x Wend Text1= x,！无法实现功能,pk,2、step （步长）来实现对循环变量的控制和变化,1、循环次数未知的情况,“当型循环”,2、单独列出一个语句来表示循环变量的变化，从而实现对循环变量的控制,1、循环次数已知的情况,1、画同心圆，不设定圆的个数，圆心为窗体中心 2、无论怎样改变窗体大小，都不让圆超出窗体边界,要求：,运行界面如图：,Circle( F1.ScaleWidth /2 , F1.ScaleHeight / 2) , r,、使用时机：循环执行的次数不确定， 但循环结束条件知道时使用。 、语句结构： While 循环体 Wend 、小心进入死循环,while.wend 循环,谢谢！,
