[高等教育]b课件6.pptVIP

第6章 循环结构程序设计▲* 6.1 For…Next循环结构 1. 格式 For 循环变量=初值 To 终值 [Step 步长] 语句组1 [Exit For] 语句组2 Next [循环变量] 例程序段： For i=2 To 13 Step 3 Print i , Next i Print “I=“, i 例: 判断以下程序段的执行结果: For i = 5 To 1 Step -1 Print i * i; Next i Print Print i 累加分析: 累加器(变量)初值 S=0 循环体(重复执行) S=S+I (I=1,2,…,N) Private Sub Command1_Click() Dim N As Integer, I As Integer, S As Integer N = Val(Text1.Text) S = 0 For I = 1 To N S = S + I Next I Label3.Caption = S End Sub 思考: 1. 求12+22+32+