VB第5章电子讲稿.pptVIP

采用循环程序可以解决一些按一定规则重复执行的问题。例如，统计一个班几十名学生，甚至全校几千名学生的学期成绩，如求平均分、不及格人数等 本章主要内容 循环语句 For...Next / Do...Loop / While...Wend 循环出口语句(Exit) 多重循环 列表框与组合框 程序举例  循环是指在指定的条件下多次重复执行一组语句。被重复执行的一组语句称为循环体 VB提供的循环语句有 Do...Loop For...Next While...Wend For Each...Next 最常用的是For...Next和Do...Loop语句 5.1.1 For...Next循环语句 按指定次数执行循环体  例5.1 在窗体上显示2至10各偶数的平方数 采用Print直接在窗体上输出结果，程序代码： Private Sub Form_Load() Dim k As Integer Show For k = 2 To 10 Step 2 Print k * k Next k End Sub 说明：上述程序，循环变量k的初值、终值和步长值分别为2，10和2，即从2开始，每次加2，到10为止，控制循环5次。每次循环都将循环体(Print k*k)执行一次 格式： For 循环变量＝初值 To 终值 [Step 步长值] 循环体 Next 循环变量  功能：本语句指定循环变量取一系列数值，并且对循环变量的每一个值把循环体执行一次 初值、终值和步长值都是数值表达式，步长值可以是正数(称为递增循环)，也可以是负数(称为递减循环) 若步长值为1，则Step 1可以省略 例5.1的执行过程 (1)求出初值、终值和步长值，并保存起来 (2)将初值赋给循环变量  (3)判断循环变量值是否超过终值(步长值为正时，指大于终值；步长值为负时，指小于终值)。超过终值时，退出循环，执行Next之后的语句  (4)执行循环体 (5)遇到Next语句时，修改循环变量值，即把循环变量的当前值加上步长值再赋给循环变量 (6)转到(3)去判断循环条件  采用Print直接在窗体上输出结果，程序代码： Private Sub Form_Load() Show s = 0 For k = 1 To 8 s = s + k Next k Print s=; s End Sub 程序运行结果如下： s＝36 注意：语句s＝s+k(循环体语句)的执行过程 采用Print直接在窗体上输出结果，程序代码： Private Sub Form_Load() Show t = 1 For c = 1 To 8 t = t * c