VB结构化程序设计基础

第5章 VB结构化程序设计基础
5.2.1 数据输入函数InputBox
其中各个参数的含义如下：
① Prompt：该参数是必需的，作为对话框消息出现的字 符串表达式。Prompt的最大长度大约为1024个字符，由 所用字符的宽度决定。如果Prompt的内容超过一行，则 可以在每一行之间用回车符Chr(13)、换行符Chr(10)或是 回车与换行符的组合Chr(13) & Chr(10)，即vbCrLf将各 行分隔开来。
用程序处理实际问题时，常常需要用户输入数 据或要求程序输出数据。下面介绍数据输入函 数InputBox和数据输出函数MsgBox，它们在 结构化程序设计中经常被使用。
第5章 VB结构化程序设计基础
5.2.1 数据输入函数InputBox
在Visual Basic中接收用户输入的信息主要使 用InputBox函数。
在Visual Basic中，这样的问题是通过选择结构 程序来解决的。选择结构也称为分支结构， Visual Basic支持的选择结构可以分为单/双行选 择语句、块结构选择语句和多分支选择语句。
第5章 VB结构化程序设计基础
5.3 选择结构
5.3.1 单/双行选择语句
单/双行选择语句比较简单，其语法格式为：
InputBox函数可以产生一个对话框，这个对话 框作为输入数据的界面，等待用户输入数据， 并返回所输入的内容，其语法格式如下：
InputBox(Prompt, [Title], [Default], [Xpos], [Ypos], [Helpfile], [Context]) As String
与单行选择语句相比，块结构选择语句有很多优点， 如块结构提供了更好的结构和灵活性，它容许条件分支跨 越数行，而且块结构可以测试更复杂的条件。此外，使用 块结构的程序可读性强、易于维护和调试。任何单行选择 语句都可以改写成块结构选择语句。
【例5-7】P87
第5章 VB结构化程序设计基础
5.3 选择结构
第5章 VB结构化程序设计基础
5.1.1 算法及其表示
【例5-1】设有两个变量x和y，x = 25，y = 70， 将这两个变量的值进行交换。
分析：如果直接进行交换，即执行x = y : y = x 这两条语句，则将y的值70赋给x时，x原来的 值25会被覆盖而丢失，其结果是交换后x和y的 值都是70。由此可见，要交换这两个变量的值 ，需要借助一个中间变量m作为临时的“容器 ”。其算法可描述如下：
第5章 VB结构化程序设计基础
5.2.1 数据输入函数InputBox
在由InputBox函数所显示的对话框中，各参数 的作用如图5-1所示。
图5-1 InputBox函数所显示的对话框 【例5-3】InputBox函数示例。P82
第5章 VB结构化程序设计基础
5.2.2 数据输出函数MsgBox
第5章 VB结构化程序设计基础
5.3 选择结构
5.3.2 块结构选择语句
1. 块结构选择语句
说明：
（1）该语句的功能是根据各个表达式的值判断执行哪个语 句块，判断的顺序为条件表达式1、条件表达式2……，即 只有当条件表达式1为False时才判断条件表达式2，当条 件表达式1和条件表达式2 都为False时，才判断条件表达 式3。这样，程序执行语句块k + 1的条件为前k个条件表达 式均为 False。如果所有条件都不是True，则执行Else后 面的语句块。
VB作为一种面向对象的程序设计语言，既继承 了结构化程序设计的优点，又采用了面向对象 、事件驱动的编程机制。就整个工程来说，它 是由许多面向对象的事件过程组成的，程序运 行过程中通过触发事件，驱动执行相应的事件 过程来实现程序的功能。
第5章 VB结构化程序设计基础
5.1.1 算法及其表示
算法是解决问题的方法和步骤。要完成某项任 务，首先要根据任务的性质决定采取什么方法 ，然后根据所采用的方法设计完成工作的具体 步骤，最后再按照所设计的步骤一步一步去完 成。要用计算机来解决一个实际问题，编程时 首先要设计好解决这个问题的算法。
② Title：该参数是可选的，显示对话框标题栏中的字符 串表达式。如果省略，则把应用程序名放入标题栏中。
③ Default：该参数是可选的，显示文本框中的字符串表 达式，在用户输入前作为缺省值。如果省略，则文本框 为空。
第5章 VB结构化程序设计基础
5.2.1 数据输入函数InputBox
④ Xpos：该参数是可选的，数值表达式，与YPos一起 出现，指定对话框的左边与屏幕左边的水平距离。如果 省略，则对话框会在水平方向居中。 ⑤ Ypos：该参数是可选的，数值表达式，与XPos一起 出现，指定对话框的顶端与屏幕顶端的距离。如果省略 ，则对话框被放置在屏幕垂直方向距底端大约三分之一 的位置。 ⑥ Helpfile和Context：这两个参数一般情况下很少使用 ，故此处不做详细介绍。
MsgBox函数的返回值是一个整数，这个整 数与所选择的按钮有关。如前面所述，MsgBox 函数所显示的对话框有7种按钮，返回值与这7种 按钮相对应，分别为1～7，见表5-3。 【例5-4,5-5】P84-85
第5章 VB结构化程序设计基础
5.3 选择结构
人们经常要求计算机能根据给定的条件进行分 析、比较和判断，并根据判断结果采取不同的 操作。例如，判断一个数是否为正数，如果是 则显示该数，否则不显示。
If 条件表达式 Then 语句块1 [Else 语句块2]
说明：
1. 条件表达式一般是关系表达式、逻辑表达式，也可以是 算术表达式，表达式的值按非零和零转换成True或False。
2. 如果没有Else语句，即为单行选择语句，此时语句块1 是必需的，在条件表达式为真时执行，条件为假时什么都 不做，直接去执行If语句后面的语句。其流程图如图5-5所 示。
除了InputBox函数之外，Visual Basic还提供 了MsgBox函数，它可以向用户传送信息，还 可以根据用户在对话框上的选择接收用户所做 的响应，作为程序继续执行的依据。
MsgBox函数的格式如下： MsgBox(Prompt, [Buttons As VbMsgBoxStyle = vbOKOnly], [Title], [Helpfile], [Context]) As VbMsgBoxResult
第5章 VB结构化程序设计基础
第5章 VB结构化程序设计基础
第5章 VB结构化程序设计基础
本章主要内容 5.1 结构化程序设计 5.2 顺序结构 5.3 选择结构 5.4 循环结构
第5章 VB结构化程序设计基础
5.1 结构化程序设计
随着计算机技术的发展，程序设计方法经历了 手工编程、结构化程序设计方法和面向对象的 程序设计方法几个阶段。
5.3.2 块结构选择语句 2. IIf函数
Visual Basic还提供了IIf函数，可用来执行简单的条件 判断操作，格式如下：
变量名 = IIf(条件表达式，值1，值2) 当条件表达式为真时，返回“值1”；当条件表达式 为假时，返回“值2”。例如r = IIf(a>5,1, 2)表示当时a>5 时执行r = l，否则执行r = 2。 【例5-8】使用IIf函数判断数字的奇偶性。P88
第1步：将x的值暂存在m中。 第2步：将y的值存入x中。 第3步：将m的值存入y中。
第5章 VB结构化程序设计基础
5.1.1 算法及其表示
【例5-2】计算一个正整数N的阶乘N！。 其算法可描述如下： 第1步：定义3个变量N、I和K，N是一个正整
数、要计算它的阶乘值，I为大于等于零的整数 ，K用来存放I！。 第2步：给出N的值；令I=0，K=1。 第3步：I=I+1，K=K×I。 第4步：判断I<N是否成立，如果成立则返回到 第3步，如果不成立则执行第5步。 第5步：输出K，即N！。
3. 如果有Else语句，即为双行选择语句，其执行过程为： 判断条件表达式，若为真则执行语句块1，否则执行语句块 2。其流程图如图5-6所示。
第5章 VB结构化程序设计基础
5.3 选择结构
条件表达式 True
语句块
False
True 语句块1
条件表达式
False 语句块2
图5-5单行选择语句流程图 图5-6双行选择语句流程图 【例5-6】P86
（2）“语句块”可以是一条语句，也可以是多条语句。当 有多条语句时，可以分别写在多行里；如果写在一行中， 则各语句之间用冒号隔开。
第5章 VB结构化程序设计基础
5.3.2 块结构选择语句
1. 块结构选择语句
说明：（3）“语句块”中的语句不能与其前面的Then写 在同一行上，否则Visual Basic认为是一个单行选择语句。 也就是说，块结构选择语句与单行选择语句的主要区别就 是看Then 后面的语句（注释语句除外）是否和Then在同 一行上。如果在同一行上，则为单行选择语句，否则为块 结构选择语句。对于块结构选择语句，必须以End If结束 ，单行选择语句没有End If。（4）在块结构的条件语句中 ，ElseIf子句的数量没有限制，可以根据需要加入任意多个 Else If子句。（5）块结构选择语句中Else If的子句和Else 子句都是可选的。如果省略这些子句，则块结构选择语句 简化为：
第5章 VB结构化程序设计基础
5.2.2 数据输出函数MsgBox
③ Title：该参数是可选的，字符串表达式，在对 话框标题栏中显示的内容。如果省略Title，则将 应用程序标题（App.Title）放在标题栏中。 ④ Helpfile和Context：这两个参数一般情况下很 少使用，故此处不做详细介绍。
If 条件表达式 Then
语句块
End If
第5章 VB结构化程序设计基础