《VB控制结构》由会员分享，可在线阅读，更多相关《VB控制结构（45页珍藏版）》请在金锄头文库上搜索。
1、第4章 VB控制结构,4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其它辅助控制语句 4.5 综合应用 4.6 程序调试,4.1 顺序结构,VB具有结构化程序设计的三种结构，即顺序结构、选择结构、循环结构，是程序设计的基础。 顺序结构就是各语句按出现的先后次序执行。一般的程序设计语言中，顺序结构的语句主要是赋值语句、输入/输出语句等。在VB中也有赋值语句；而输入/输出可以通过文本框控件、标签控件、InputBox函数、MsgBox函数和过程等来实现。,本章目录,4.1.1 赋值语句,形式： 变量名表达式 计算右边表达式的值，然后赋给左边的变量。 给变量赋值和设定属性是VB编程中
2、常见的两个任务。例如： n = n + 1 计数累加 Text1.Text “ 清除文本框的内容 Text1.Text “欢迎使用VB “ 文本框显示字符串,本章目录,赋值语句注意点,赋值语句不允许写成 表达式变量，虽然赋值号与关系运算符等于号都用=表示，VB系统会根据所处的位置自动判断符号的意义。赋值号左边的变量只能是变量，不能是常量、常数符号、表达式。下面均为错误的赋值语句： Now()=x+y 左边是表达式(函数) 5=sqr(s)+x+y 左边是常量,本章目录,InputBox函数 打开一个对话框，等待用户输入，返回字符串类型的输入值。 形式：InputBox(提示,标题,默认值,x坐
3、标位置,y坐标位置) 提示项不能省略。若要多行提示，可在每行行末加回车换行vbCrLf。 例4.1利用InputBox输入基本工资和营业额，按营业额的5%提成，计算实发工资并显示。,4.1.2 数据输出和输入,本章目录,打开一个信息框，等待用户选择一个按按钮。 MsgBox函数返回所选按钮的值，MsgBox过程不返回值 MsgBox函数形式：变量% = MsgBox(提示,按钮,标题) MsgBox过程形式：MsgBox 提示,按钮,标题 按钮项是一整型表达式，决定信息框按钮的数目和类型及出现在信息框上的图标形式。,MsgBox函数和MsgBox过程,本章目录,MsgBox按钮设置,本章目录,
4、MsgBox所选按钮返回值,例4.2 编一账号和密码输入的检验程序，当输入不正确，如账号为非数字字符，密码不正确等，显示有关信息，再输入。,本章目录,9,Print方法,作用:在对象上输出信息。 对象.PrintSpc(n)|Tab(n)输出列表 ;|, 对象：窗体、图形框或打印机。缺省为窗体。 Spc(n)函数：从当前位置起空n个空格 Tab(n)函数：从最左端开始计算的第n列 分号：定位在上一个被显示的字符之后 逗号：定位在下一个打印区开始处(每区14列) Print语句尾无分号或逗号，输出后换行 例4.3 Print方法输出图形,10,Format格式输出函数,形式： Format (表
5、达式, “格式字符串“) 常用数值格式化符及举例,例4.4 利用Format函数显示数值。,4.2 选择结构,计算机要处理的问题往往是复杂多变的，仅采用顺序结构是不够的。必须利用选择结构等来解决实际应用中的各种问题。VB中提供了多种形式的条件语句来实现选择结构，有If条件语句和Select情况语句等。它们都是对条件进行判断，根据判断结果，选择执行不同的分支。,本章目录,4.2.1 If条件语句,1. IfThen语句(单分支结构)If Then语句块（可以是一句或多句语句）End If 或 If Then 表达式：关系表达式、逻辑表达式，算术表达式。表达式值按非零为True，零为False进行
6、判断。 该语句的作用是当表达式的值为True，执行Then后面的语句块，否则不做任何操作。,本章目录,IF演示,单分支结构,例：已知两个数x和y，比较它们的大小，使得x大于y。If xy Thent=xx=yy=tEnd If 或 If x= “A“ And UCase(ch) = “ 0“ And ch = “9“ Then 数字字符MsgBox(ch + “是数字字符“)Else 除上述字符以外的字符MsgBox(ch + “是其他字符“)End If,不管有几个分支，依次判断，当某条件满足，执行相应的语句，其余分支不再执行；若条件都不满足，且有Else子句，则执行该语句块，否则什么也不执
7、行。ElseIf不能写成 Else If,多分支结构例,本章目录,If语句的嵌套是指If或Else后面的语句块中又包含If语 If 表达式1 ThenIf 表达式2 ThenEnd If End If,If xy Then t=x: x=y: y=t If yz Thent=y: y=z: z=t If xyz 用一个IF语句和一个嵌套的IF语句实现,本章目录,4.2.2 Select Case语句,Select Case 变量或表达式Case 表达式列表1语句块1Case 表达式列表2语句块2Case Else语句块n+1 End Select,表达式列表与变量或表达式的类型必须相同，是下面
8、4种形式之一 ： 表达式 例: “A“ 一组用逗号分隔的枚举值 2,4,6,8 表达式1 To 表达式2 60 To 100 Is 关系运算符表达式 Is 0 And y 0 ThenMsgBox(“在第一象限“) ElseIf x 0 ThenMsgBox(“在第二象限“) ElseIf x 0 And y 0 And y 0MsgBox(“在第一象限”)Case x 0MsgBox(“在第二象限”)Case x 0 And y y，x，y) 该语句与如下语句等价 ： If x y Then Tmax = x Else Tmax = y,本章目录,4.2.3 条件函数,(2) Choose函
9、数 Choose(整数表达式，选项列表) 根据表达式的值i,返回选项列表中第i个选项。如果整数表达式的值越出选项范围时，返回Null。 例 根据Nop的值，得到+、-、中的某运算符： Op= Choose(Nop，“+“，“-“，“，“) 例4.10 根据当前日期，显示今日是星期几。 t = Choose(Weekday(Now), “星期日”, “星期一”, “星期二”, “星期三”, “星期四”, “星期五”, “星期六”) MsgBox(“今天是：“ & Now & t),本章目录,Dim nop As Integer, op As Char Randomize() nop = Int(
10、Rnd() * 4 + 1) op = Choose(nop, “+“, “-“, “, “) MsgBox(“nop=“ & nop & “ op=“ & op),4.3 循环结构,计算机最擅长的功能之一就是按规定的条件，重复执行某些操作。例如，按照人口某增长率，对人口增长统计；根据各课程的学分、绩点和学生的成绩，统计每个学生的平均绩点等。这类问题都可通过循环结构来方便地实现。VB中提供了两种类型的循环语句：一种是计数循环语句；另一种是条件型循环语句。,本章目录,4.3.1 For循环语句,For循环语句用于控制循环次数预知的循环结构。 For 循环变量 初值 To 终值 Step 步长语句
11、块Exit For语句块 Next 循环变量 循环变量必须为数值型。 循环次数,例4.11 计算1100的奇数和,本章目录,Dim i%, sum% For i = 1 To 100 Step 2sum = sum + i Next i MsgBox(sum),For循环语句,循环流程： (1) 循环变量被赋初值，它仅被赋值一次。 (2) 判断循环变量是否在终值内，如果是，执行循环体；如果否，结束循环，执行Next的下一语句。 (3) 循环变量加步长，转(2)，继续循环,例4.12 将可打印的ASCII码制成表格输出,本章目录,4.3.2 DoLoop循环语句,Do循环用于控制循环次数未知的循环结构。 形式1： Do While|Until 语句块Exit Do 语句块 Loop形式1为先判断后执行，有可能一次也不执行； 形式2为先执行后判断，至少执行一次。,形式2： Do 语句块Exit Do语句块 Loop While|Until ,本章目录,DoLoop流程,本章目录,循环例题,例4.13 我国有13亿人口，按人口年增长0.8%计算，多少年后我国人口超过26亿。 解此问题两种方法，可根据公式：,
