第4章 VB控制结构 4.1顺序结构 4.2选择结构 4.3循环结构 4.4其它铺助控制语句 4.5综合应用 4.6程序调试 VB程序设计简明教程 本书目录
VB程序设计简明教程 本书目录 4 第4章 VB控制结构 4.1 顺序结构 4.2 选择结构 4.3 循环结构 4.4 其它辅助控制语句 4.5 综合应用 4.6 程序调试
4.1顺序结构 VB具有结构化程序设计的三种结构，即顺序结 构、选择结构、循环结构，是程序设计的基础。 顺序结构就是各语句按出现的先后次序执行。 般的程序设计语言中，顺序结构的语句主要是赋 值语句、输入/输出语句等。在VB中也有赋值语 句；而输入/输出可以通过文本框控件、标签控 件、InputBox函数、MsgBox函数和过程等来 实现。 VB程序设计简明教程 本书目录 本章目录
VB程序设计简明教程 本书目录 5 4.1 顺序结构 VB具有结构化程序设计的三种结构，即顺序结 构、选择结构、循环结构，是程序设计的基础。 顺序结构就是各语句按出现的先后次序执行。一 般的程序设计语言中，顺序结构的语句主要是赋 值语句、输入/输出语句等。在VB中也有赋值语 句；而输入/输出可以通过文本框控件、标签控 件、InputBox函数、MsgBox函数和过程等来 实现。 本章目录
4.1.1 赋值语句 形式：变量名=表达式 计算右边表达式的值，然后赋给左边的变量。 给变量赋值和设定属性是VB编程中常见的两个 任务。例如： n=n+1 计数累加 Text1.Text ·清除文本框的内容 Text1.Text="欢迎使用VB 文本框显示字符串 VB程序设计简明教程 本书目录 本章目录
VB程序设计简明教程 本书目录 6 4.1.1 赋值语句 形式： 变量名＝表达式 计算右边表达式的值，然后赋给左边的变量。 给变量赋值和设定属性是VB编程中常见的两个 任务。例如： n = n + 1 '计数累加 Text1.Text ＝ "" ' 清除文本框的内容 Text1.Text ＝ "欢迎使用VB " ' 文本框显示字符串 本章目录
赋值语句注意点 ◆赋值语句不允许写成表达式=变量，虽然赋 值号与关系运算符等于号都用=表示，VB系统 会根据所处的位置自动判断符号的意义。 ◆赋值号左边的变量只能是变量，不能是常量、 常数符号、表达式。下面均为错误的赋值语句 Now()=x+y '左边是表达式（函数） 5=sgr(s)+x+y 左边是常量 VB程序设计简明教程 本书目录 本章目录
VB程序设计简明教程 本书目录 7 赋值语句注意点 赋值语句不允许写成 表达式＝变量，虽然赋 值号与关系运算符等于号都用=表示，VB系统 会根据所处的位置自动判断符号的意义。 赋值号左边的变量只能是变量，不能是常量、 常数符号、表达式。下面均为错误的赋值语句： Now()=x+y '左边是表达式(函数) 5=sqr(s)+x+y ' 左边是常量 本章目录
4.1.2 数据输出和输入 nputBox函数 打开一个对话框，等待用户输入，返回字符串 类型的输入值 形式：InputBox(提示L,标题][，默认值][，x坐标 位置][y坐标位置]) 提示项不能省略。若要多行提示，可在每行行 末加回车换行vbCrLf。 例4.1利用InputBox输入基本工资和营业额 按营业额的5%提成，计算实发工资并显示。 VB程序设计简明教程 本书目录 本章目录
VB程序设计简明教程 本书目录 8 InputBox函数 打开一个对话框，等待用户输入，返回字符串 类型的输入值。 形式：InputBox(提示[,标题][,默认值][,x坐标 位置][,y坐标位置]) 提示项不能省略。若要多行提示，可在每行行 末加回车换行vbCrLf。 例4.1利用InputBox输入基本工资和营业额， 按营业额的5%提成，计算实发工资并显示。 4.1.2 数据输出和输入 本章目录
MsgBox函数和MsgBox过程 打开一个信息框，等待用户选择一个按按钮。 MsgBox函数返回所选按钮的值，MsgBox过 程不返回值 MsgBox函数形式： 变量[%]=MsgBox(提示[，按钮][，标题]) MsgBox过程形式： MsgBox提示[，按钮][，标题] 按钮项是一整型表达式，决定信息框按钮的数 目和类型及出现在信息框上的图标形式。 VB程序设计简明教程 本书目录 本章目录
VB程序设计简明教程 本书目录 9 打开一个信息框，等待用户选择一个按按钮。 MsgBox函数返回所选按钮的值，MsgBox过 程不返回值 MsgBox函数形式： 变量[%] = MsgBox(提示[,按钮][,标题]) MsgBox过程形式： MsgBox 提示[,按钮][,标题] 按钮项是一整型表达式，决定信息框按钮的数 目和类型及出现在信息框上的图标形式。 MsgBox函数和MsgBox过程 本章目录
MsgBox按钮设置 分组 内部常数 值 描述 VBOkOnly 0 确定按钮 VBOkCancel 1 确定、取消按钮 按钮 VBAboutRetrylgnore 2 终止、重试、忽略按钮 数目 VBYesNoCancel 3 是、否、取消按钮 VBYesNo 4 是、否按钮 VBRetryCancel 5 重试、取消按钮 VBCritical 16 关键信息图标3 图标 VBQuestion 32 询问信息图标③ 类型 VBExclamation 48 警告信息图标 VBInformation 64 信息图标 默认 VBDefaultButton1 0 第1个按钮为默认 按钮 VBDefaultButton2 56 第2个按钮为默认 VBDefaultButton3 512 第3个按钮为默认 VB程序设计简明教程 本书目录 本章目录 10
VB程序设计简明教程 本书目录 10 MsgBox按钮设置 VBDefaultButton3 512 第3个按钮为默认 VBDefaultButton2 56 第2个按钮为默认 默认 VBDefaultButton1 0 第1个按钮为默认 按钮 VBInformation 64 信息图标 VBExclamation 48 警告信息图标 VBQuestion 32 询问信息图标 VBCritical 16 关键信息图标 图标 类型 VBRetryCancel 5 重试、取消按钮 VBYesNo 4 是、否按钮 VBYesNoCancel 3 是、否、取消按钮 VBAboutRetryIgnore 2 终止、重试、忽略按钮 VBOkCancel 1 确定、取消按钮 VBOkOnly 0 确定按钮 按钮 数目 分组 内 部 常 数 值 描 述 本章目录
MsgBox所选按钮返回值 内部常数 返回值 被单击的按钮 vbok 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vblgnore 5 忽略 vbYes 6 是 vbNo 7 否 例4.2编一账号和密码输入的检验程序，当输入不正 确，如账号为非数字字符，密码不正确等，显示有关 信息，再输入。 VB程序设计简明教程 本书目录 本章目录 11
VB程序设计简明教程 本书目录 11 MsgBox所选按钮返回值 例4.2 编一账号和密码输入的检验程序，当输入不正 确，如账号为非数字字符，密码不正确等，显示有关 信息，再输入。 本章目录 内部常数 返回值 被单击的按钮 vbOk 1 确定 vbCancel 2 取消 vbAbort 3 终止 vbRetry 4 重试 vbIgnore 5 忽略 vbYes 6 是 vbNo 7 否
Print方法 作用：在对象上输出信息。 对象.Print[Spc(n)Tab(n)][输出列表][；，] 对象：窗体、图形框或打印机。缺省为窗体。 Spc(n)函数：从当前位置起空n个空格 Tab(n)函数：从最左端开始计算的第n列 分号：定位在上一个被显示的字符之后 逗号：定位在下一个打印区开始处（每区14列） Printi语句尾无分号或逗号，输出后换行 例4.3 Print方法输出图形 VB程序设计简明教程 本书目录 12
VB程序设计简明教程 本书目录 12 Print方法 作用:在对象上输出信息。 对象.Print[Spc(n)|Tab(n)][输出列表 ][;|,] 对象：窗体、图形框或打印机。缺省为窗体。 Spc(n)函数：从当前位置起空n个空格 Tab(n)函数：从最左端开始计算的第n列 分号：定位在上一个被显示的字符之后 逗号：定位在下一个打印区开始处(每区14列) Print语句尾无分号或逗号，输出后换行 例4.3 Print方法输出图形
Format格式输出函数 形式：Format(表达式，"格式字符串") 常用数值格式化符及举例 符号 作用 表达式 格式字符串 显示结果 0 用0填充不足的位置 1234.567 "00000.0000" 01234.5670 井 位置不足时不填充0 1234.567 "#####.###" 1234.567 千分位 1234.567 "##,##0.000" 1,234.567 % 数值乘以100，加百分号 1234.567 "####.##%" 123456.7% $ 在数字前强加$ 1234.567 "$###.#” $1234.57 E+ 用指数表示 1234.567 "0.00E+00" 1.23E-01 例4.4利用Formati函数显示数值。 VB程序设计简明教程 本书目录 13
VB程序设计简明教程 本书目录 13 Format格式输出函数 形式： Format (表达式[, "格式字符串"]) 常用数值格式化符及举例 E+ 用指数表示 1234.567 "0.00E+00" 1.23E-01 ＄ 在数字前强加＄ 1234.567 "$###.##" $1234.57 % 数值乘以100，加百分号 1234.567 "####.##%" 123456.7% ， 千分位 1234.567 "##,##0.000" 1,234.567 # 位置不足时不填充0 1234.567 "#####.####" 1234.567 0 用0填充不足的位置 1234.567 "00000.0000" 01234.5670 符号 作 用 表达式 格式字符串 显示结果 例4.4 利用Format函数显示数值