Chap.4 VB基本控制结构

注释
三、注释语句 为了提高程序的可读性，通常在程序的适当位置加 上必要的注释。VB中的注释语句的前缀是一个单撇号' 或保留字Rem。 1.格式 ' | Rem < 注释内容 > 2.说明 （1）Rem与注释内容之间至少要有一个空格。 （2）注释语句是非执行语句，不参加编译和执行。 （3）注释语句可放在过程、模块的开头，也可放在 执行语句的后面。 （4）任何字符（包括汉字）都可以放在注释行中作 为注释内容。
exit
二、Exit语句 1.作用 Exit语句用于退出 Do...Loop、For...Next、Function或Sub代码块 2.对应的使用格式 Exit Do、Exit For、Exit Function、Exit Sub 分别表示退出 Do循环、For循环、函数、子过程
End
三、End语句 1.格式 End 2.作用 结束一个程序的执行。可以放在任何事件过程中。 VB的End语句还有多种形式，用于结束一个过程或 程序块，其他形式有： End If End With End Type End Select End Sub End Function
循环嵌套
4.3.4 循环嵌套
一、定义 在一个循环结构中又完整地包含另一个循环结构， 称为循环的嵌套。 While语句、For-Next语句和Do-Loop语句均允许嵌 套，也可以互相嵌套。
二、说明 1.内循环变量与外循环变量不能同名。 2.循环语句嵌套时，必须保证结构的完整。即外循环 必须完全包含内循环，不能交叉。 3.不能从循环体外转向循环体内，也不能从外循环转 向内循环，反之则可以。 4.外循环变量每变化一次，内循环变量执行若干次。
4.3.1 While-Wend 循环语句
一、格式 While 条件表达式 [循环体] Wend 二、执行过程 首先求解“条件表达式”，当值为True（非0值）时 ， 执行“循环体”，遇到Wend语句时，执行流程再返 回 求解“条件表达式”，若仍然为True（非0值）， 则重复上述过程；否则，退出该While语句。
说明
三、说明 “条件表达式”一直为True,则进入死循环。
四、【例4.5】计算1+2+3+„+10的和。
Do-loop
4.3.2 Do-Loop 循环语句
格式1 DO [ 循环体] : [Exit Do] LOOP WHILE 条件 格式3 DO WHILE 条件 [循环体]:[Exit Do] LOOP 格式2 DO [循环体]:[Exit Do] LOOP UNTIL 条件 格式4 DO UNTIL 条件 [循环体]:[Exit Do] LOOP
Chap.4 Visual Basic基本 控制结构
4.0 4.1 4.2 4.3 4.4 VB源程序的书写格式 顺序结构 选择结构 循环结构 其他辅助控制语句
本章要点
1.了解结构化程序设计的三种基本控制结构（顺序结 构、选择结构和循环结构）的含义。 2.理解赋值语句、注释语句和End语句的功能并能熟 练应用。 3.灵活使用Print方法（输出格式的问题）。 4.了解If语句和Select Case语句的功能并能灵活使 用。 5.了解While语句、Do语句和For-Next语句以及循环嵌 套的功能并能灵活使用。
4.1 顺序结构
顺序结构只有一个入口和一个出口，计算机按 照先后顺序依次执行程序中的各条语句。
顺序结构的流程图
语句1
语句2
语句n
赋值
一、赋值语句 1.作用 把一个表达式的值赋给一个变量或控件的一个属性。 2.格式 <变量名> = <表达式> 或 <对象名> .<属性名> = <表达式> 3.说明 （1）赋值语句中的“=”是赋值号，与关系运算符 “=”的含义不同。 （2）先计算赋值号右边表达式的值，然后将此值赋给 赋值号左边的变量或控件属性。赋值号左右两边的 数据类型必须一致。
例
四、【例4.4】 输入一个年份、月份，判断： ①该年是否是闰年？ ②该年中的月份有几天？ 要点：闰年的判断 (nian MOD 4=0 AND nian MOD 100<>0) OR (nian MOD 400=0)
循环
4.3 循环结构
循环控制结构是一种重复结构。在Visual Basic中， 循环控制结构可以通过以下循环控制语句来实现： ◆ While-Wend循环语句（当型循环） ◆ Do-Loop 循环语句（Do循环） ◆ For –Next 循环语句（计数循环） ◆ If-Goto 循环语句
有关函数
补充：与Print方法有关的函数
1.Tab函数 （1）格式：Tab[(n)] （2）功能：把光标移到参数n指定的位置；若n省略， 则光标移到下一个制表区。 （3）说明：一个Print方法中可以有多个Tab()，每 个Tab对应一个输出项，各输出项之间使用分号； 分隔。 2.Spc函数 （1）格式：Spc(n) （2）功能：光标跳过n个空格。 （3）说明：和Tab()作用类似，可以互相替代。但 Tab()需要从数据的左端开始计数，而Spc()只表示 两个输出项之间的间隔。 3.Space$()和Format$()
说明
说明 1.do„loop while循环和do while„loop循环是当 条件为True时执行循环体；而do „loop until循 环和do until „loop循环则是当条件为False时 执行循环体。 2.do„loop while循环和 do „loop until循环是 先执行循环体一次再判断条件；而do while„ loop 循环和 do until „loop循环则是先判断条 件再决定是否执行循环体。 3.当省略了While|Until条件，表示无条件循环。 4.Exit Do 语句：当遇到该语句时，退出循环。 【例4.6】计算1+2+3+„+10的和。
（3）当输出多个表达式时，各表达式用分隔符（逗号 、分号或空格）隔开。若用逗号分隔，则按标准格 式(14个字符位置为单位)显示数据项。如果表达式 之间用分号或空格作分隔符，则按紧凑格式输出。 当输出数值型数据时，数值的前面有一个符号 位，后面有一个空格；而字符串前后都没有。 （4）一般情况下，每执行一次Print方法要自动换行 ，也就是说，后面执行Print时将在新的一行显示 信息。为了仍在同一行上显示，可以在末尾加上逗 号或分号。
4.2选择
4.2 选择结构
选择控制结构可以通过选择控制语句来实现。在 Visual Basic中，选择控制语句有以下两种： ◆ If 语句
◆ Select Case 语句
4.2.1 If语句
一、单行if语句 1.格式 If 条件表达式 Then 语句块1 [Else 语句块2] 2.执行过程 先求解“条件表达式”，如果值为True（非0值）， 则执行“语句块1”；否则，执行“语句块2”。 3.【例4.1】输入3个数，求最大值。 【例4.2】 1 (x>0) y= 0 (x=0) -1 (x<0)
三、说明 1.循环变量、初值、终值、步长（增量）、循环体 （省略表示延迟时间）、Exit For（提前退出当前循 环）。 2.下列两种情况，循环体一次也不执行 （1）当步长>0时，初值>终值 （2）当步长<0时，初值<终值 而当初值=终值时，步长大于0或小于0，循环体均 执行一次。 3.循环次数 循环次数 =int（（终值-初值）/步长）+1 四、【例4.7】计算1+2+3+„+10的和。
for
4.3.3 For-Next循环语句
一、格式 For 循环变量=初值 To 终值 [Step 步长] [循环体] [Exit For] Next [循环变量] 二、执行过程 首先把“初值”赋给“循环变量”，若循环变量 的值不超过“终值”，则执行循环体一次，然后执行 “循环变量=循环变量+步长”,重复上述过程；若 超过，则跳出For循环,执行Next 后面的语句。
select
4.2.2 Select Case语句
一、格式 Select Case 测试表达式 Case 条件表达式1 语句块1 [ Case 条件表达式2 语句块2 ] … [ Case 条件表达式n 语句块n ] [ Case Else 语句块n+1 ] End Select
流程
二、执行过程 首先求解“测试表达式”，再判断该值与哪个Case 子句中“条件表达式”的值相同，如果找到，则执行 该Case子句中相应的语句块；如果没有找到，则执行 Case Else子句中相应语句块。最后执行End Select 后面的语句。 三、说明 1.测试表达式”可以是数值表达式或字符串表达式 （通常是有值的变量），不能是关系表达式或逻辑表 达式，也不能出现多个变量。
图示和例
正确形式 For i =1 To For j =1 To … Next j Next i For i =1 … Next i For j =1 …… Next j To 100 200
错误形式
For i =1 To For j=1 To … Next i Next j For 100 200
iif
三、IIf函数 IIf函数可用来执行简单的条件判断。 1.格式 IIf(条件,True部分,Else部分) 2.执行过程 当“条件”为True（非0值）时，IIf函数返回 “True 部分”；否则，返回“Else部分”。 3.说明 “True部分”、“Else部分”和返回值的类型要一 致。 4.【例】 if a>5 then r=iif(a>5,1,2) r=1 else r=2
块if语句
二、块if语句 1.格式 If 条件表达式1 Then 语句块1 [ElseIf 条件表达式2 Then 语句块2] [ElseIf 条件表达式3 Then 语句块3] … [Else 语句块n] End If
2.执行过程 先求解“条件表达式1”，如果值为True（非0值）， 则执行“语句块1”；否则顺序求解“条件表达式2”， 如 果值为True （非0值），则执行“语句块2”；…；如 果 条件都为False（0值），则执行“语句块n”（如果存 在 ）。执行了相应的语句块之后，程序流程退出该块if语 句，继续执行End if后面的语句。 3.【例4.3】
作业
4.0 VB源程序的书写格式
程序行的书写格式自由。 一般情况下，一行一句，一句一行。但VB允许一 行中写多条语句，且各语句之间必须使用冒号（： ）分隔；一条语句也可分写在多行上，此时每行末 尾必须使用续行符下划线（_），且续行符与它前 面的字符之间至少要有一个空格。 允许使用注释。
顺序结构
Print
二、数据的输出——Print方法 Print是输出数据、文本的一个重要方法，可以将 数据输出到窗体、立即窗口、图片框和打印机上。 1.格式 [对象名.]Print [表达式 [，|；[表达式]„]] 2.说明 （1）“对象名”可以是窗体、立即窗口（Debug）、 图片框、打印机。如果省略“对象名”，则在当前 窗体上输出。 （2）“表达式”可以是数值或字符串表达式。如果 省略表达式00
i =1 To 100 For i=1 To 200 … Next i Next i
三、【例4.8】求S=1！+2！+„+N!
4.4节
4.4 其他辅助控制语句
一、Goto语句 1.格式 GoTo {标号|行号} 2.作用 无条件地转移到标号或行号指定的那行语句。 3.说明 （1）GoTo语句只能转移到同一过程的标号或行号处。 标号是一个字符系列，首字符必须为字母，与大小写 无关，任何转移到的标号后面必须有冒号“：”；行 号是一个数字序列。 （2）以前BASIC中常用此语句，可读性差；现在要求 尽量少用或不用，改用选择结构或循环结构来代替。
2.“条件表达式”必须与“测试表达式”的类型相同。 3.“条件表达式”称为域值，可以是下列形式之一或混 合形式： <表达式1> [ ，<表达式2> ]…… 例如， case 1,3,4,6 <表达式1> To <表达式2> 例如， case 1 to 10 Is <关系表达式> 注意：使用is，则只能用关系运算符，并且只能表 示简单条件，不能描述组合条件。 4.Case子句的顺序可任意，但case else子句必 须放在所有的case子句之后。