Visual Basic可视化程序设计教程 第6章循环结构程序设计新.ppt

第6章 循环结构程序设计 本章要点： 1．计数循环（For—Next循环的使用 2．当循环（While—Wend循环）的应用3．多重循环的应用 6 循环结构 6.1 循环结构控制语句 6.1.1循环概述 在程序中，凡是需要重复相同或相似的操作步骤，都可以使用循环结构来实现。循环结构由两部分组成：循环体，即要重复执行的语句序列；循环控制部分，即用于规定循环的重复条件或重复次数，同时确定循环范围的语句。 要使计算机能够正常执行某循环，由循环控制部分所规定的循环次数必须是有限的。 VB提供了三种不同风格的循环结构，分别是： 计数循环（For—Next循环） 当循环（While—Wend循环） Do循环（Do—Loop循环） 其中计数循环常用于已知循环次数的循环，而当循环和Do循环适合于循环次数未知，只知道循环结束条件的循环。 6.1.2 FOR循环 格式： For 循环变量=初值 To 终值 [Step 步长] [循环体] Next [循环变量] 格式说明： （1）“循环变量”：被用作循环计数器的数值变量。 （2）“初值”、“终值”：都是数值型，可以是数值表达式。 （3）“步长”：是数值型，可以是数值表达式。 步长不能为0。如果步长是1，则Step 1可以省略不写。 （4）“循环体”：在For和Next之间一条或多条语句，他们将被执行指定的次数。 （5）Next后面的循环变量与For语句中的循环变量必须相同。 For循环的执行过程如下 为： （1）系统将初值赋给循环变量，并自动记下终值和步长。 （2）判断循环变量是否超过终值：未超过终值，执行一次循环体；否则，结束循环 （3）执行Next语句，将循环变量加上一个步长。 （4）转到（2），继续执行。 （5）结束循环，执行Next后面的语句。 6.1.3 while循环 While循环的格式如下： While 条件表达式 [循环体] Wend 该循环格式中的条件表达式一般为布尔表达式，也可以是数值和字符表达式，结果为True或False，用来表示一个判断条件。 6.2 循环的嵌套 在一个循环体内又出现另外的循环语句称为循环嵌套，也称为多重循环。在嵌套结构中，对嵌套的层数没有限制，有几层嵌套，就说是几重循环。 多重循环的执行过程是，外循环每执行一次，内循环都要从头到尾执行一遍。 例如： For I = 1 To 5 For J = 1 To 3 Print I, J, I + J Next J Next I 在以上的双重循环中，外循环变量I取1时，内循环就要执行3次（内循环变量J依次取1、2、3），接着，外循环变量取值2，内层循环同样要重新执行3次（J再一次取1、2、3）……这样下去，循环体一共执行了5*3次，即15次。 6.3 循环程序应用举例 6.3.1 单循环应用举例 6.3.2 多重循环应用举例 1. 字符图形的输出 （2）方程求解 （3）其他综合应用 【例6.11】单击窗体时，在窗体上作出正弦函数y=sin（x）的草图。 正弦函数草图 分析：程序中是采用连续的星号来组成函数曲线的。因为输出时只能从上到下逐行输出，所以，为了实现的方便，在这个题目中是将屏幕的垂直方向作为X轴，水平方向作为Y轴。 程序代码如下： Private Sub Form_Click() For x = 0 To 6.28 Step 0.3 y = Sin(x) Print Tab(65 + 20 * y); * Print Next x End Sub 【例6.12】输入任意一个整数，将其反向输出。如：输入6231，则输出1326。 分析：实现任意一个整数的反向输出，首先应该将这个数的每个数字位给拆出，然后再把它们按照反序重新组合。假设整数a由文本框Text1获得，编写程序如下： Private Sub Command1_Click() a = Val(Text1.Text) d = 0 While (a 0) b = a Mod 10 获得当前数的最低位 d = d * 10 + b 将得到的数位组合到变量d中 a = a \ 10 Wend Print d End Sub 在以上程序中，循环的对一个数进行了Mod 10和整除10的运算，目的是依次的得到数字的各个数位，得到一个数位后使用累加将其组合到新的变量中。 返回 1. 字符图形的输出 3. 其他综合应用 2. 方程求解问题 返回 【例6.13】在窗口中实现输出以下图形。 (a) (b) (c) (d) 在解决这类问题时，应首先考虑一个一般行的输出，只需要把这个一般行的输出语句利用循环结构控制执行多次即可。例如，在输出图形