单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,单击此处编辑母版标题样式,单击此处编辑母版文本样式,第二级,第三级,第四级,第五级,*,循环的复习一,杨涛,Dim i,s As Integer,s=0,i=0,10 i=i+1,s=s+i,If i 100 Then,GoTo,10,Label3.Caption=s,例,:,编程求,1+2+3+99+100,的和。,1+2+3+99+100,加数的变化：,1,，,2,，,3,，,，,100,有序、后一个数总比前一个大,1,，用,i,代表加数，用语句,10 i=i+1,来实现。其中,10,为语句标号，用语句,If i 100 Then,GoTo,10,实现循环，用,s=,s+i,实现累加。当,i=100,时，退出循环，并输出结果：,Label3.Caption=s,For i=1 To 100,s=s+i,Next i,i=0,10 i=i+1,s=s+i,If i 100,s=,s+i,i=i+1,Label3.caption=s,本程序执行过程：,For i=1 To 100,s=s+i,Next i,F,T,For i=1 To 100,s=s+i,Next i,1+2+3+,+99+100,For i=1 To 100,Next i,s=s+1/i,For i=1 To 100,Next i,S=s+(,1,/i),t,*,t,=1,t=-t,变量,t,为符号变量,For i=1 To 100,Next i,s1=,s1,+(,1,/i),Step 2,s1=0,For i=,2,To 100,Next i,s2=,s2,+(,1,/i),Step 2,s2=0,s=s1-s2,共,50,项，其中第,i,项可表示为：,1/(2*i-1)-1/(2*i)i=1,2,，,50,For i=1 To,s=s+,Next i,50,1/(2*i-1)-1/(2*i),作业,1.,编程求,2-4+6-8.+100,的和。窗体如下图所示：,2.,输入一个数,n,，求,1,到,n,的累加值。窗体如下图所示：,3.,求,2000,年到,3000,年间一共有多少个闰年。,提示：闰年的条件：年号能被,400,整除；或者能被,4,整除而不能被,100,整除。窗体如下图所示：,