VB程序设计基础 第4章 程序的基本结构
合集下载
VB第4章
数据输入输出
例1：MsgBox "请确认交易金额",33,"交易 确认"
例2：MsgBox "请确认交易金额",52,"交易 确认"
MsgBox按钮设置
分组
内部常数 VBOkOnly VBOkCancel VBAboutRetryIgnore VBYesNoCancel VBYesNo VBRetryCancel VBCritical
数据输入输出
1、标签和文本框 说明：标签利用它的Caption属性；文本框利 用它的Text属性。 例如： a%=Val（Text1） ’完成数据输入 c！=5/9*（a-32） Text2=c ’完成数据输出 Label1.Caption=3.14*r*r
数据输入输出
2、输入对话框InputBox函数 功能:打开一个对话框，等待用户输入，返回 字符串类型的输入值。 例: InputBox("请输入数值")
If 条件语句
2、双分支结构
形式： （1）If <表达式> Then <语句块1> Else <语句块2> End if
（2）If <表达式> Then
T 表达式 F
语句块 1
语句块 2
<语句1>
Else
<语句 2>
例：下列哪一段代码是正确的？
1) if a>1 then k=0 else k=1 2) if a>1 then k=0 end if 错误 3) if a>1 then k=0 else k=1
Visual Basic 程序设计教程
第四章 VB控制结构
VB编程序的基本结构
Case 9, 10
Msgbox ("Greater than 8“)
Case Else
Msgbox ("Not between 1 and 10“)
End Select
例：编写程序,当输入X的值后用 Selct Case语句 计算输出Y的值。
Private Sub Button1_Click(ByVal _ sender As System.Object, ByVal e As _ System.EventArgs) Handles _ Button1.Click
InputBox的功能是等待并提示用户为程序运行 输入指定的数据，简称“输入对话框”。
MsgBox的功能是进行提示，用以确认某种程 序的操作，简称“消息框”。
本书目录
6
1. InputBox （输入对话框函数）
输入对话框一般由标题、提示信息、“确定” 按钮、“取消”按钮和一个供用户输入的文本框组 成。当用户将输入信息输入到文本框，并单击“确 定”按钮后，函数返回用户输入的字符串数据。当 单击“取消”按钮时，返回一个空字符串。
语法格式：变量名 = 表达式
功能: 计算赋值号“=”右边表达式的值，然后赋给赋
值号“=”左边的变量。
给变量赋值和设定属性是VB编程中常见的两个任务
如以下语句，
n=n+1
'计数累加
Label1.Text ＝ "欢迎使用VB "
以下语句形式很常用：
• dim sum% , x%
sum=100 : x=5
Select语句举例
Dim Number% Number = Val(InputBox("输入整数"))
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 循环语句
VB程序设计基础全集
1.1.2 Visual Basic的特点
4．提供了易学易用的应用程序集成开发环境 在Visual Basic的集成开发环境中，用户可设计界面、编写代 码、调试程序，直至将应用程序编译成可执行文件在 Windows上 运行，使用户在友好的开发环境中工作。
5．支持多种数据库系统的访问
利用 Visual Basic 的数据控件，可访问 Microsoft Access、 Dbase、Microsoft FoxPro、Paradox 等 ， 也 可 以 访 问 Microsoft Excel、Lotusl 1-2-3等多种电子表格。
录
Visual Basic 6.0程序设计概述 程序设计基础 结构化程序设计与数组 函数与过程 常用控件 图形控件和图形方法 对话框和菜单程序设计 文 件
第9章 数据库与数据访问技术
第1章 Visual Basic 6.0程序设 计概述
1.1 1.2 1.3 1.4 1.5 1.6 1.7
主
编 ：陈庆章
前 言
Visual Basic是目前进行Windows应用程序设计的最 佳工具之一，也是最佳的程序设计入门语言，这一看法 已经得到普遍认可。 非计算机专业计算机基础教学的 3 个不同层次，分 别解决的是“操作技能”、“思维训练”、“综合应用 能力”问题。学习一门程序设计语言，主要目的是要提 高读者分析归纳、解决问题的能力，在思维训练方面受 益，并使得读者通过更系统、深入的学习后开发实用程 序成为可能。 因此，本书在内容上精选了Visual Basic 6.0中最基 础、最常用并实用的部分；在编排和风格上力图体现循 序渐进、深入浅出的特点；以样本程序示例教学，阶段 性构筑读者的成就感，使得艰苦的程序设计工作升华为 一种艺术创作，提供了一条通往程序设计高手的捷径。
VB-第4章-VB语言基础
注意:为了与字符串型常量相区分，所以用＃将日期常量括起来
VB语言基础
13
业，精于勤，荒于嬉
业，精于勤，荒于嬉
（5）符号常量
常量在程序中也可以用符号表示 目的是为了…… 代表常量的符号称为“常量名” 常量名的命名规则是： 1、不超过255个字符 2、只能由字母、数字和下划线组成并且首字符必须是字母的字符串 3、常量中字母大小通杀（不区分大小写）。 比如： Const PI As single=3.14159 ‘声明了常量PI，代表3.14159，单精度型 Const MAX As Integer=&O144 ‘声明了常量MAX，代表八进制数144，整型 Const COUNT#=45.67 '声明了常量COUNT，代表45.67，双精度型
业，精于勤，荒于嬉
4、可以用（Const ）语句来定义符号常量。 5、可以在常量的后面加上类型说明符以显示常量 的类型，可以用（ $ ）表示字符串型常量。 6、下列是合法的VB变量名的是（A） A：a2 B：2a C：int sum D：2*a 7、下列各项不是VB基本数据类型的是（A） A：Char B:String C:Integer D:Double
Private Sub Command1_Click() Dim liming As string End Sub Private Sub Command2_Click() Dim liming As string End Sub
VB语言基础
19
业，精于勤，荒于嬉
窗体/模块级变量
业，精于勤，荒于嬉
VB语言基础
10
业，精于勤，荒于嬉
业，精于勤，荒于嬉
3）理解数值的范围
vb结构化程序设计的三种基本结构
vb结构化程序设计的三种基本结构1.引言1.1 概述概述部分将介绍VB结构化程序设计及其重要性。
VB（Visual Basic）是一种面向对象的程序设计语言，它强调程序的结构化和模块化，以便于代码的可读性和维护性。
VB结构化程序设计通过组织程序代码以一种逻辑和有序的方式，使程序更加易于理解、调试和修改。
在VB结构化程序设计中，有三种基本结构，即顺序结构、选择结构和循环结构。
这些基本结构的正确使用可以使程序具备更好的可控性和灵活性，使其能够适应各种复杂的应用场景。
顺序结构是指程序按照代码的排列顺序依次执行，没有任何条件判断或循环。
顺序结构使得程序的逻辑清晰明了，易于理解。
通过合理地安排程序的执行顺序，可以确保程序按照我们所期望的方式执行。
选择结构允许根据条件的判断来决定程序的执行路径。
根据条件的不同，程序可以选择执行不同的代码块。
选择结构使得程序具有决策能力，可以根据具体条件来作出不同的处理。
循环结构允许程序根据条件的判断来重复执行某段代码。
循环结构使得程序可以重复执行一些特定的操作，节省了代码量，并提高了程序的效率。
本文将重点介绍这三种基本结构的原理和使用方法，并提供一些示例代码来帮助读者更好地理解和使用VB结构化程序设计。
通过学习和掌握这些基本结构，读者将能够编写出更加清晰、可读性更高、可维护性更好的代码，提高程序的质量和效率。
1.2 文章结构文章结构部分的内容应该包括对整篇文章的组织和框架进行介绍。
下面是对文章结构内容可能的写法：在本篇文章中，我们将讨论VB结构化程序设计的三种基本结构。
为了使读者更好地理解这些基本结构，本文将按照以下结构组织：第一部分为引言，包括对整篇文章的概述、文章结构和目的进行介绍。
在概述部分，我们将简单介绍VB结构化程序设计的概念和重要性。
文章结构部分将解释本文的整体组织框架，并说明每个章节的主要内容。
目的部分将说明本文的写作目的和预期的读者受众。
第二部分为正文，将分别介绍VB结构化程序设计的三种基本结构。
VB程序设计 习题及答案第4章 选择结构程序设计
第4章选择结构程序设计4．1 写出数学式|x|<2.5×10-2对应的Visual Basic表达式。
【答案】x<2.5e-2 and x>-2.5e-24．2 逻辑运算符And、Or和Not的优先级最高的是哪一个。
【答案】Not4．3 已知 W=10 X=9 Y=8 Z=7 ，求下列表达式的结果。
(1) W>X And Y<=Z OR X>Y(2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z)(4) Not (Y<>X Or W*3>Z)【答案】(1) True(2) True(3) True(4) False4．4 写出下列十进制整数逻辑运算的结果：(1) X = 23 And 14(2) X = 23 Or 14(3) X = -1 And 19(4) X = -1 Or 10(5) X = Not -1【答案】(1) 6(2) 31(3) 19(4) -1(5) 04．5 已知变量X和Y的值分别为5、6，编写程序，交换变量X和Y的值。
【参考答案】程序代码设计Private Sub Form_Click()x = 5: y = 6t = x: x = y: y = tForm1.Print "x="; x, "y="; yEnd SubPrivate Sub Form_Load()Form1.AutoRedraw = TrueForm1.Print "x = 5", "y = 6"Form1.Print "单击窗体交换x,y的值"图4-1 程序运行结果End Sub程序运行结果如图4-1所示：4．6 从键盘输入一个学生的三科成绩，计算总分，并找出最高分。
【参考答案】（1）用户界面设计（2）控件属性设置（略）（3）程序代码设计Private Sub Command1_Click()g1 = Val(Text1.Text)g2 = Val(Text2.Text)g3 = Val(Text3.Text)Var = (g1 + g2 + g3) / 3g = g1If g < g2 Then g = g2If g < g3 Then g = g3Text4.Text = VarText5.Text = gEnd Sub图4-2 程序运行结果程序运行结果如图4-2所示。
第四章vb计算机
注意：
①
当表达式值的精度与变量的精度不一致时，强制转换成左边 的精度，如m% = 10/3 ，则m中的结果为3 当表达式是数字字符串，左边变量是数值类型，自动转换为 数值类型再赋值，但表达式有非数字字符时，则出错。
②
例如： n%=“123”
2013年7月17日星期三
n%=“12a3”
Visual Basic程序设计
符号 0 作 用 用0填充不足的位置 表达式 1234.567 格式字符串 "00000.0000" 显示结果 01234.5670
#
， %
位置不足时不填充0
千分位 数值乘以100，加百分号
1234.567
1234.567 1234.567
"#####.####"
"##,##0.000" "####.##%"
2013年7月17日星期三
Visual Basic程序设计
3. If…Then…ElseIf语句(多分支结构) 形式： If <表达式1> Then <语句块1> ElseIf <表达式2>Then <语句块2> … [Else 语句块 n+1 ] End If 注意: 1) 此处Else和If之间不能有空格，否则程序出错。 2)“表达式1-n”都是逻辑表达式。 3)不管有几个分支,程序执行了满足条件的一个分支后,其余分支不再执行。 4) 一个多分支结构中只有一个End If语句。 5)当多分支中有多个表达式同时满足时，只执行第一个与之匹配的语句块。 注意多分支中表达式的书写顺序。 6) 块结构的条件语句可以嵌套 。
4) Xpos，Ypos：是两个整数值，确定对话框在屏幕上的位置；如 果省略，则对话框显示在屏幕中心线向下约1/3处。
①
当表达式值的精度与变量的精度不一致时，强制转换成左边 的精度，如m% = 10/3 ，则m中的结果为3 当表达式是数字字符串，左边变量是数值类型，自动转换为 数值类型再赋值，但表达式有非数字字符时，则出错。
②
例如： n%=“123”
2013年7月17日星期三
n%=“12a3”
Visual Basic程序设计
符号 0 作 用 用0填充不足的位置 表达式 1234.567 格式字符串 "00000.0000" 显示结果 01234.5670
#
， %
位置不足时不填充0
千分位 数值乘以100，加百分号
1234.567
1234.567 1234.567
"#####.####"
"##,##0.000" "####.##%"
2013年7月17日星期三
Visual Basic程序设计
3. If…Then…ElseIf语句(多分支结构) 形式： If <表达式1> Then <语句块1> ElseIf <表达式2>Then <语句块2> … [Else 语句块 n+1 ] End If 注意: 1) 此处Else和If之间不能有空格，否则程序出错。 2)“表达式1-n”都是逻辑表达式。 3)不管有几个分支,程序执行了满足条件的一个分支后,其余分支不再执行。 4) 一个多分支结构中只有一个End If语句。 5)当多分支中有多个表达式同时满足时，只执行第一个与之匹配的语句块。 注意多分支中表达式的书写顺序。 6) 块结构的条件语句可以嵌套 。
4) Xpos，Ypos：是两个整数值，确定对话框在屏幕上的位置；如 果省略，则对话框显示在屏幕中心线向下约1/3处。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
1．当左右均为数值类型时，右边表达式的精度与左 边变量精度不同时，强制转换成左边变量的精度。 2．当右边表达式是数字字符串，左边变量是数值类 型时，自动转换成数值类型再进行赋值。但如果表达 式中有非数字字符或空字符串时，就会出错。
3．当逻辑表达式复制给数值类型时，true转换为-1， false转换为0； 反之，当数值类型转换为逻辑类型时，非0转换为 true，0转换为false。 4．任何非字符类型赋值给字符类型时，均自动转换 为字符类型。
命令按钮
图标
VbDefaultButton1
默认按钮 VbDefaultButton2 VbDefaultButton3 VbDefaultButton4 强制返回 VbApplicationModel VSystemModel
0
256 512 768 0 4096
第一个按钮是默认值
第二个按钮是默认值 第三个按钮是默认值 第四个按钮是默认值 程序强制返回，直到用户作出响应。 系统强制返回，直到用户作出响应。
（二） 语句执行的说明
1、 “测试表达式”——可以是数值型或字符串表 达 式。 程序运行时会判断哪个“表达式”与“测试表 达式”相符，若相符则执行“表达式”后面的语句 块。可见:这种程序结构与前面的带ElseIf子句的If语 句类似（多分支结构）。
多分支结构流程图
表达式1
True False
表达式2
语句块n
3．注意： （1）无论有多少个分支，程序执行一个分支以 后，其余的分支便不再执行 （2）关键字ElseIf不能写成Else If
（3）当多分支中有多个表达式同时满足判断条 件时，则只执行第一个与之匹配的语句。
例4.8 根据输入的百分制成绩Score，转换成优、良、 中、及格、不及格5个等级，并在窗体上显示出来。 等级划分标准如下： 优 Score>=90 良 80<=Score<90 等级 = 中 70<=Score<80 及格 60<=Score<70 不及格 Score<60
（一）IF……then语句（单分支） 语句格式： 1、If <表达式> Then <语句体> 2、或：If <表达式> Then
语句块 End If
•表达式：一般为关系表达式、逻辑表达式，也可以 是算术表达式。表达式的值不为零则视为True，为 零则视为False。 语句块：一个或多个语句。若用1的简单形式，则语 句块只能是单个语句。 功能：判断条件，为真则执行语句体；否则执行后 面的语句。
显示按钮、图标
―确定”，按钮 ―确定”，“取消” 按钮 ―终止”，“重试”，“忽略”按钮 ―是”，“否”，“取消”按钮 ―是”，“否”按钮 ―重试”，“取消”按钮 Critical Message图标 Warning Query图标 Warning Message图标 Informaation Message图标
(二) 应用InputBOX函数的几个问题 1.有些参数可以省略，但是参数出现的位置和顺 序是固定的，用来分隔参数的逗号不能省略。 2.该函数返回的是字符串，若输入数值并参与计 算，需用Val( )函数将其转换为数值型。
3．Inputbox一旦被调用，用户必须响应，否则程 序一直处于等待状态，无法继续执行。 4.一个InputBOX对话框只能输入一个值，通常可 结合循环语句进行赋值。 5.对话框上的“确定”按钮用于确认；“取消”按 钮可使输入内容作废，返回一个空字符串。
类别
符号常量
VbOKOnly VbOKCancel VbAbortRetrylgnore VbYesNoCancel VbYesNo VbRetryCancel VbCritical VbQuestion VbExclamation Vbinformaation
值
0 1 2 3 4 5 16 32 48 64
（二）使用赋值语句时的注意事项： 1．“=‖的左边只能是变量名，不允许出现常量 和表达式。 Exp(2)=e^2 36=6^2 100=10*10
2．不允许在同一个赋值语句中为多个变量复 制（c语言允许） x1=x2=0 编译器将会把第一个=当成赋值符 号，而把第二个=当成比较运算符，把x2=0当作了 逻辑表达式。
（四）If语句的嵌套：
注意： 1、EndIf 总是与最接近的If配对。 2、为增强程序的可读性，书写代码时最好采用 锯齿形。
例 4.9 从键盘上输入三个整数，分别赋值给 变量x1,x2,x3比较它们的大小并重新排列，使得 x1>x2>x3。
二、情况语句（Select Case） ( 多分支结构)
将数值表达式按“格式控制符”制定的格式输出 例子： a=123456789 b=12/24 Print format (a,‖0000000000‖) ‗前面补0 Print format (a,‖###,###,###.00‖) ‗分节与小数点 Print format (b,‖%‖) ‗输出百分数 Print format (a,‖-#########‖) ‗输出负数 Print format (2345,‖####E+5‖) ‗输出浮点数
2、判断表达式中如果出现“=‖，则视为关系运算符， 不视为赋值运算。
（二）if……then ……else 语句( 双分支) 1、语句格式：
If
条件 Then 语句块1 Else 语句块2 End If
语句1 Else 语句2
或
If 条件 Then 2、功能：
判断条件，若条件为真，执行语句块1；条件为 假，执行语句块2。即在两个语句块中选择一个。
语句格式的流程图见下图:
前一语句
条件
True False
语句
后续语句
例4.1 根据用户在消息框中单击的命令按钮， 决定是否结束程序的运行：
例4.2：在窗体上设置三个命令按钮，当点击其 中一个时，另两个即失效。
注意：
1、简单if语句关键字then之后只能在同一行上有语 句。所以不用加End If。否则换行之后的语句将被视 为在选择结构之后的语句。
VbCancel VbAbort VbRetry VbIgnore VbYes VbNo
例子：用InputBox函数输入一个正整数，若输入正 确，计算其平方根。
模态窗口——运行时，模态窗口挂起应用程序的 其他窗口操作，直到获得应答。
（三）MsgBox语句
1．格式：
MsgBox <prompt>
2．作用：只是向用户报告一个简短的信息， 没有返回值。
四、格式输出函数Format与Print方法
Format通常与Print方法配合使用
格式：Format (表达式[，格式控制符]) 说明： 表达式——要格式化输出的数值、日期或字符串类型 表达式 格式控制符——用来指定输出个实的字符串，格式字 符串必须用双引号括起来。
功能：按一定格式输出
（一）数值格式化
例子：计算两个输入数据的和、差、积
Dim a As String Dim b As String Private Sub Form_Click() a = InputBox ("输入A的值") b = InputBox ("输入B的值") x = Val(a) y = Val(b) Print Print Print "两数之和="; x + y Print "两数之差="; x - y Print "两数之积="; x * y End Sub
If
2.语句功能 如果第k个条件表达式 (k=1,2,3… …)成立， 则执行语句块k(k=1,2,3… …)， 否则执行语句块n。 其判断顺序为表达式1、表达式二……
多分支结构流程图
表达式1
True False
表达式2
True
False False
表达式n-1
True语句块1语 Nhomakorabea块2语句块n-1
三、消息框MsgBox函数和MsgBox语句 MsgBox函数用于生成一个对话框，提示用户进 行选择操作。 (一)函数的格式 MsgBox (prompt[,buttons][,title][,helpfile,context]) 其中： prompt—对话框提示信息。 Title—显示对话框标题。 helpfile,context—帮助文件的名字，帮助目录号。 buttons—是一个整数或符号常量，用于控制对话框显 示的按钮，图标的种类和数量。它是由四类数值相加 产生。 注意：有些参数可以省略，但是参数出现的位置和 顺序是固定的，用来分隔参数的逗号不能省略。
一、赋值语句
赋值语句由变量名、赋值运算符（＝）和 某种类型的表达式组成。赋值语句的一般格式为： 变量=表达式 赋值语句有两个基本功能：对表达式进行计算 和保存表达式的值。 赋值语句被执行时：它先对赋值运算符右边的 表达式进行计算，然后将结果存储在运算符左边 的变量中。
若事先定义了变量的类型，变量的类型和表达式 计算结果的值必须相匹配。 （一）赋值号两边类型不一致时的处理规则：
（二）函数的用途 在应用程序中，MsgBox的返回值一般用来作为继 续执行程序的依据，根据返回值决定后面的操作。 MsgBox函数的返回值
返回值 1 操作 选“确定”按钮 符号常量 VbOk
2 3 4 5 6 7
选“取消”按钮 选“终止”按钮 选“重试”按钮 选“忽略”按钮 选“是”按钮 选“否”按钮
第四章 程序的基本结构
Visual Basic程序包括三种基本结构： 顺序结构、 选择和分支结构、 循环结构。
退出
§ 4.1 顺序结构
顺序结构就是指：各个语句按出现的先后顺序依次 执行。
…
开始语句 语句1 语句2
……
3．当逻辑表达式复制给数值类型时，true转换为-1， false转换为0； 反之，当数值类型转换为逻辑类型时，非0转换为 true，0转换为false。 4．任何非字符类型赋值给字符类型时，均自动转换 为字符类型。
命令按钮
图标
VbDefaultButton1
默认按钮 VbDefaultButton2 VbDefaultButton3 VbDefaultButton4 强制返回 VbApplicationModel VSystemModel
0
256 512 768 0 4096
第一个按钮是默认值
第二个按钮是默认值 第三个按钮是默认值 第四个按钮是默认值 程序强制返回，直到用户作出响应。 系统强制返回，直到用户作出响应。
（二） 语句执行的说明
1、 “测试表达式”——可以是数值型或字符串表 达 式。 程序运行时会判断哪个“表达式”与“测试表 达式”相符，若相符则执行“表达式”后面的语句 块。可见:这种程序结构与前面的带ElseIf子句的If语 句类似（多分支结构）。
多分支结构流程图
表达式1
True False
表达式2
语句块n
3．注意： （1）无论有多少个分支，程序执行一个分支以 后，其余的分支便不再执行 （2）关键字ElseIf不能写成Else If
（3）当多分支中有多个表达式同时满足判断条 件时，则只执行第一个与之匹配的语句。
例4.8 根据输入的百分制成绩Score，转换成优、良、 中、及格、不及格5个等级，并在窗体上显示出来。 等级划分标准如下： 优 Score>=90 良 80<=Score<90 等级 = 中 70<=Score<80 及格 60<=Score<70 不及格 Score<60
（一）IF……then语句（单分支） 语句格式： 1、If <表达式> Then <语句体> 2、或：If <表达式> Then
语句块 End If
•表达式：一般为关系表达式、逻辑表达式，也可以 是算术表达式。表达式的值不为零则视为True，为 零则视为False。 语句块：一个或多个语句。若用1的简单形式，则语 句块只能是单个语句。 功能：判断条件，为真则执行语句体；否则执行后 面的语句。
显示按钮、图标
―确定”，按钮 ―确定”，“取消” 按钮 ―终止”，“重试”，“忽略”按钮 ―是”，“否”，“取消”按钮 ―是”，“否”按钮 ―重试”，“取消”按钮 Critical Message图标 Warning Query图标 Warning Message图标 Informaation Message图标
(二) 应用InputBOX函数的几个问题 1.有些参数可以省略，但是参数出现的位置和顺 序是固定的，用来分隔参数的逗号不能省略。 2.该函数返回的是字符串，若输入数值并参与计 算，需用Val( )函数将其转换为数值型。
3．Inputbox一旦被调用，用户必须响应，否则程 序一直处于等待状态，无法继续执行。 4.一个InputBOX对话框只能输入一个值，通常可 结合循环语句进行赋值。 5.对话框上的“确定”按钮用于确认；“取消”按 钮可使输入内容作废，返回一个空字符串。
类别
符号常量
VbOKOnly VbOKCancel VbAbortRetrylgnore VbYesNoCancel VbYesNo VbRetryCancel VbCritical VbQuestion VbExclamation Vbinformaation
值
0 1 2 3 4 5 16 32 48 64
（二）使用赋值语句时的注意事项： 1．“=‖的左边只能是变量名，不允许出现常量 和表达式。 Exp(2)=e^2 36=6^2 100=10*10
2．不允许在同一个赋值语句中为多个变量复 制（c语言允许） x1=x2=0 编译器将会把第一个=当成赋值符 号，而把第二个=当成比较运算符，把x2=0当作了 逻辑表达式。
（四）If语句的嵌套：
注意： 1、EndIf 总是与最接近的If配对。 2、为增强程序的可读性，书写代码时最好采用 锯齿形。
例 4.9 从键盘上输入三个整数，分别赋值给 变量x1,x2,x3比较它们的大小并重新排列，使得 x1>x2>x3。
二、情况语句（Select Case） ( 多分支结构)
将数值表达式按“格式控制符”制定的格式输出 例子： a=123456789 b=12/24 Print format (a,‖0000000000‖) ‗前面补0 Print format (a,‖###,###,###.00‖) ‗分节与小数点 Print format (b,‖%‖) ‗输出百分数 Print format (a,‖-#########‖) ‗输出负数 Print format (2345,‖####E+5‖) ‗输出浮点数
2、判断表达式中如果出现“=‖，则视为关系运算符， 不视为赋值运算。
（二）if……then ……else 语句( 双分支) 1、语句格式：
If
条件 Then 语句块1 Else 语句块2 End If
语句1 Else 语句2
或
If 条件 Then 2、功能：
判断条件，若条件为真，执行语句块1；条件为 假，执行语句块2。即在两个语句块中选择一个。
语句格式的流程图见下图:
前一语句
条件
True False
语句
后续语句
例4.1 根据用户在消息框中单击的命令按钮， 决定是否结束程序的运行：
例4.2：在窗体上设置三个命令按钮，当点击其 中一个时，另两个即失效。
注意：
1、简单if语句关键字then之后只能在同一行上有语 句。所以不用加End If。否则换行之后的语句将被视 为在选择结构之后的语句。
VbCancel VbAbort VbRetry VbIgnore VbYes VbNo
例子：用InputBox函数输入一个正整数，若输入正 确，计算其平方根。
模态窗口——运行时，模态窗口挂起应用程序的 其他窗口操作，直到获得应答。
（三）MsgBox语句
1．格式：
MsgBox <prompt>
2．作用：只是向用户报告一个简短的信息， 没有返回值。
四、格式输出函数Format与Print方法
Format通常与Print方法配合使用
格式：Format (表达式[，格式控制符]) 说明： 表达式——要格式化输出的数值、日期或字符串类型 表达式 格式控制符——用来指定输出个实的字符串，格式字 符串必须用双引号括起来。
功能：按一定格式输出
（一）数值格式化
例子：计算两个输入数据的和、差、积
Dim a As String Dim b As String Private Sub Form_Click() a = InputBox ("输入A的值") b = InputBox ("输入B的值") x = Val(a) y = Val(b) Print Print Print "两数之和="; x + y Print "两数之差="; x - y Print "两数之积="; x * y End Sub
If
2.语句功能 如果第k个条件表达式 (k=1,2,3… …)成立， 则执行语句块k(k=1,2,3… …)， 否则执行语句块n。 其判断顺序为表达式1、表达式二……
多分支结构流程图
表达式1
True False
表达式2
True
False False
表达式n-1
True语句块1语 Nhomakorabea块2语句块n-1
三、消息框MsgBox函数和MsgBox语句 MsgBox函数用于生成一个对话框，提示用户进 行选择操作。 (一)函数的格式 MsgBox (prompt[,buttons][,title][,helpfile,context]) 其中： prompt—对话框提示信息。 Title—显示对话框标题。 helpfile,context—帮助文件的名字，帮助目录号。 buttons—是一个整数或符号常量，用于控制对话框显 示的按钮，图标的种类和数量。它是由四类数值相加 产生。 注意：有些参数可以省略，但是参数出现的位置和 顺序是固定的，用来分隔参数的逗号不能省略。
一、赋值语句
赋值语句由变量名、赋值运算符（＝）和 某种类型的表达式组成。赋值语句的一般格式为： 变量=表达式 赋值语句有两个基本功能：对表达式进行计算 和保存表达式的值。 赋值语句被执行时：它先对赋值运算符右边的 表达式进行计算，然后将结果存储在运算符左边 的变量中。
若事先定义了变量的类型，变量的类型和表达式 计算结果的值必须相匹配。 （一）赋值号两边类型不一致时的处理规则：
（二）函数的用途 在应用程序中，MsgBox的返回值一般用来作为继 续执行程序的依据，根据返回值决定后面的操作。 MsgBox函数的返回值
返回值 1 操作 选“确定”按钮 符号常量 VbOk
2 3 4 5 6 7
选“取消”按钮 选“终止”按钮 选“重试”按钮 选“忽略”按钮 选“是”按钮 选“否”按钮
第四章 程序的基本结构
Visual Basic程序包括三种基本结构： 顺序结构、 选择和分支结构、 循环结构。
退出
§ 4.1 顺序结构
顺序结构就是指：各个语句按出现的先后顺序依次 执行。
…
开始语句 语句1 语句2
……