6第六章循环结构.ppt

第6章 循环结构程序设计 问题: 求12+22+32+42+…小于某数N的最大值，N由用户指定。 特点:已知循环条件、未知循环次数，用Do … Loop循环结构实现 6.2.1 格式 本章小结 While循环结构 Do循环结构 For循环结构 GoTo型循环 第六章 循环结构程序设计 例: For I = 1 To 3 For J = 5 To 7 Print I, J Next J Next I 执行过程: …… 例: For I = 1 To 3 For J = 1 To I For K = -1 To -2 S = S + I + J + K Next K Next J Next I 执行过程: …… 第六章 循环结构程序设计 说明 (1) 嵌套的循环可以是For…Next循环，也可以是 Do…Loop循环 (2) FOR循环有一个公共端点,可使用一个NEXT语句，循环变量按从内到外排列 FOR I=1 TO 3 FOR J=5 TO 7 PRINT I,J NEXT J,I FOR I=1 TO 3 FOR J=5 TO 7 PRINT I,J NEXT J NEXT I 例: (3) 内外循环不应交叉 例: FOR I=... FOR J=... ... NEXT I NEXT J 第六章 循环结构程序设计 (4) 嵌套循环应选用不同的循环变量 例: FOR I=1... FOR J=... ... NEXT J ... FOR J=... ... NEXT J NEXT I 第六章 循环结构程序设计 【例6.4】求1+(1+2)+(1+2+3)+…(1+2+3+…+n)， n由用户输入。 分析: …… Private Sub Form_Click() N = Val(Text1.Text) Sum = 0 For I = 1 To N Sum1 = 0 For J = 1 To I Sum1 = Sum1 + J Next J Sum = Sum + Sum1 Next I Text2.Text = Sum End Sub 【例6.5】打印九九乘法口诀。 分析: 因为乘法口诀中相乘的两个因子都是不断变化的，因此该问题需要有两重循环才能实现，外层循环控制一个因子的变化，内层循环控制另一个因子的变化；而且内层因子的取值范围与外层因子有关系！ 第六章 循环结构程序设计 第六章 循环结构程序设计 Private Sub Form_Load() Dim i, j As Single Show 使输出可见 FontSize = 8 For i = 1 To 9 For j = 1 To i Print j ; * ; i ; = ; i * j ; Next j Print ‘ 控制换行 Next i End Sub 第六章 循环结构程序设计 小结 形式：VB提供了四种循环结构的语句： 1）While … Wend 2）Do … Loop 3）For … Next 4）Goto 方法： 1）判断出要用循环结构来做 2）寻找（或创造）循环条件 3）明确循环体，及循环条件在循环体中作用 4）设计算法流程，或直接编程实现 第六章 循环结构程序设计 * 第六章 循环结构程序设计 本章要点: ? While循环结构 ? Do循环结构 ? For循环结构 ? GoTo型循环 ?多重循环 特点: 重复相同或相似的操作步骤 结构: 循环体—要重复执行的语句序列。 循环控制部分—规定循环的重复条件或重复次数，确定循环范围的语句 第六章 循环结构程序设计 对比选择结构，思考：