第3章VisulBasic程序结构.pptVIP

(4) 程序运行结果如图3.5所示。 图3.5 例3-4程序运行结果 图3.6 For循环语句结构 3.2.2 循环结构 循环是在指定的条件下多次重复执行一组语句。Visual Basic中提供了多种形式的循环结构，最主要的有For...Next循环语句和Do...Loop循环语句两种。它们的区别是For...Next循环语句知道具体的循环次数；而Do...Loop语句并不知道确切的次数，通常由一个条件来终止循环。 1．For循环语句 For循环语句用于控制循环次数预知的循环结构。循环语句结构如图3.6所示，语句形式如下： For循环变量=初值 to 终值 [ Step 步长] 语句块 [Exit For] 语句块 Next 循环变量 说明 (1) 循环变量必须为数值型。 (2) 步长一般为正，初值小于终值；若为负，这时初值大于终值；缺省时步长为1。 (3) 语句块可以是一条或多条语句。 (4) Exit For表示当遇到该语句时，退出循环，执行Next的下一条语句。 (5) For循环语句执行的过程如下： ① 循环变量被赋初值，它仅被赋值一次。 ② 判断循环变量是否在终值内，若是，则执行循环体；若否，则结束循环，执行Next的下一语句。 ③ 循环变量加步长，转②，继续循环。 2．Do...Loop循环语句 Do循环用于控制循环次数未知的循环结构。此种语句有两种语法形式，分别如下： 形式1 Do {While | Until}条件 语句块 [Exit Do] 语句块 Loop 形式2 Do 语句块 [Exit Do] 语句块 Loop {While | Until}条件 说明： (1) 形式1是先判断后执行，有可能一次也不执行；形式2是先执行后判断，至少执行一次。两种形式(指While)的流程分别见图3.7和图3.8。 (2) 关键字While用于指明条件为True时就执行循环体中的语句，Until正好相反。 (3) Exit Do表示当遇到该语句时，退出循环，执行Loop的下一语句。 图3.7 Do {While | Until}条件循环结构 图3.8 Do循环结构 对于循环的嵌套，要注意以下事项： (1) 内循环变量与外循环变量不能同名。 (2) 外循环必须完全包含内循环，不能交叉。 (3) 不能从循环体外转向循环体内，也不能从外循环转向内循环，反之则可以。 【例3–5】 分别用两种循环方式求1+2+3+…+100的值，运行结果如图3.9所示。 图3.9 例3-5程序运行结果 两个按钮的Click单击事件代码分别为： Do...Loop循环结构 Private Sub Command1_Click( ) Dim s As Integer, n As Integer s = 0 n = 1 Do While n = 100 s = s + n n = n + 1 Loop Text1.Text = s End Sub For...Next循环结构 Private Sub Command2_Click( ) Dim s As Integer, n As Integer s = 0 For n = 1 To 100 s = s + n Next n Text1.Text = s End Sub 3.2.3 其它辅助控制语句 1．GoTo语句 GoTo语句的形式如下： GoTo{标号 | 行号} 该语句的作用是使程序执行无条件地转移到标号或行号指定的那行语句。 ① GoTo语句只能转移到同一过程的标号或行号处。标号是一个字符序列，首字符必须为字母，大小写无关，任何转移到的标号后应有冒号；行号是一个数字序列。 ② 以前的Basic语言中，GoTo语句的使用频率很高，编制出的程序称为BS程序(Bowl of Spaghetti Program，面条式的程序)，使程序结构不清晰，可读性差。结构化程序设计中要求尽量少用或不用GoTo语句，用选择结构或循环结构来代替。 2．End语句 End语句的形式如下： End 该语句用于结束一个程序的运行，它可以放在任何事件过程中