VB数据输入输出
- 格式：ppt
- 大小：437.50 KB
- 文档页数：27
下载文档原格式
合集下载
一、VB输入和输出及基本函数
VB
一、输入和输出
（一）、输入：
（Dim a As Integer Dim a%）→ 1. Private Sub Command1_Click() a = 6: b = 6 print a print b End Sub
定义变量a的类型
注意：同一行连续写时，需要用“：”隔开。
2. Private Sub Command1_Click() a = Val(text1.Text): b = Val(text2.Text) Print a; b End Sub 3. Private Sub Command1_Click() a = Val(InputBox(“ ")) b = Val(InputBox(“ ")) MsgBox (a): MsgBox (b) End Sub
注意：关于各函数用法详见书47页2.6节。
三、相关知识
1. F8 调试检查语句对错
2. “ ‘注释”注释（绿色）VB不可读
注意：在使用时一定要注意操作过程中是否拉了文本框 控件。
3. Private Sub Command1_Click() a = 9: b = 6 Print a, b End Sub
“，”代表同一行 隔8个字符输出
பைடு நூலகம்注意:
Private Sub Command1_Click() a = 6: b = 6 print a “print a后没有任何 print b 符号”代表换行输出 End Sub
(二)、输出：
1. Private Sub Command1_Click() a = Val(InputBox("")) b = Val(InputBox("")) MsgBox (a): MsgBox (b) End Sub
一、输入和输出
（一）、输入：
（Dim a As Integer Dim a%）→ 1. Private Sub Command1_Click() a = 6: b = 6 print a print b End Sub
定义变量a的类型
注意：同一行连续写时，需要用“：”隔开。
2. Private Sub Command1_Click() a = Val(text1.Text): b = Val(text2.Text) Print a; b End Sub 3. Private Sub Command1_Click() a = Val(InputBox(“ ")) b = Val(InputBox(“ ")) MsgBox (a): MsgBox (b) End Sub
注意：关于各函数用法详见书47页2.6节。
三、相关知识
1. F8 调试检查语句对错
2. “ ‘注释”注释（绿色）VB不可读
注意：在使用时一定要注意操作过程中是否拉了文本框 控件。
3. Private Sub Command1_Click() a = 9: b = 6 Print a, b End Sub
“，”代表同一行 隔8个字符输出
பைடு நூலகம்注意:
Private Sub Command1_Click() a = 6: b = 6 print a “print a后没有任何 print b 符号”代表换行输出 End Sub
(二)、输出：
1. Private Sub Command1_Click() a = Val(InputBox("")) b = Val(InputBox("")) MsgBox (a): MsgBox (b) End Sub
vb教程---输入输出顺序结构1
(3) Enabled属性:该属性决定控件是否对用户产生的事件 作出响应 (4) Visible属性 该属性决定控件是否可见，默认值为True。 (5)Height、Width、Top和Left属性：Height和Width属性 确定控件的高度和宽度，Top和Lelf属性确定控件在窗体中 的位置
X Top Left Width Y
Buttons参数值=65 ( 1+64+0) 或 vbOKCancel+ vbInformation+VbDefaultButton1
练习使用信息框
设计一个如下所示的提示框：
A = MsgBox("非法数据！" + Chr(13) +Chr(10)+ "是否继续？", vbYesNo + vbCritical, "提示信息")
Buttons参数值= 1+64 或 vbOKCancel+ vbInformation
Buttons参数的设置
3.说明哪一个是缺省按钮
Buttons的和=按钮设置值+图标设置值+缺省按钮值
对应值 符号常量 缺省的活动按钮
0
256 512
VbDefaultButton1
VbDefaultButton2 VbDefaultButton3
2. Tab函数
函数格式：Tab(n) 功能：把输出位置移到第n列。
例如：
Print Tab(2);"学号"；Tab(11);"姓名"；Tab(21);"成绩"
输出结果是(1个汉字占2个位置)：
└┘学号└┘└┘└┘└┘└┘姓名└┘└┘└┘└┘└┘└┘成绩
vb排列递归,要求输入随机n个数,输出m个数的组合
VB排列递归算法是一种用于处理组合问题的经典算法。
它可以帮助我们在给定一组数的情况下，找出其中任意个数的排列组合。
在使用中，我们可以输入随机n个数，然后利用VB排列递归算法输出m个数的组合。
今天，我们就来详细介绍一下VB排列递归算法的原理和操作步骤。
一、VB排列递归算法的原理1.1 递归算法递归算法是一种常见的解决问题的方法，它是指在函数的定义中使用函数本身的方法。
在VB排列递归算法中，递归的核心思想是将大问题分解为小问题，然后通过递归调用来解决小问题。
1.2 排列组合在数学中，排列和组合是常见的概念。
排列是指从给定的元素中按照一定顺序选取一定数量的元素，而组合是指从给定的元素中选取一定数量的元素，顺序无关紧要。
VB排列递归算法可以帮助我们高效地求解排列和组合的问题。
二、VB排列递归算法的操作步骤现在，我们来介绍一下使用VB排列递归算法求解组合问题的具体操作步骤。
2.1 输入随机n个数我们需要输入一组随机的n个数，这些数可以是整数、小数或者是字符串，根据实际需求而定。
2.2 设置输出m个数的组合接下来，我们需要设置输出m个数的组合，即从输入的n个数中选取m个数进行组合。
2.3 编写VB排列递归算法在VB编程环境中，我们需要编写排列递归算法的具体代码。
这部分代码主要涉及递归函数的定义和递归调用的实现，通过递归的方式来实现排列组合的求解。
2.4 执行VB排列递归算法一切准备就绪后，我们可以执行VB排列递归算法，得到输出m 个数的组合结果。
这些组合结果可以是打印输出、保存到文件或者在界面中展示，根据实际需求进行选择。
三、VB排列递归算法的应用实例现在，我们通过一个具体的示例来演示VB排列递归算法的应用过程。
3.1 示例说明假设我们有一组数字{1, 2, 3, 4, 5}，我们需要从中选取3个数字进行组合，那么该怎么做呢？接下来，我们就通过VB排列递归算法来解决这个问题。
3.2 操作步骤我们需要输入数字{1, 2, 3, 4, 5}，然后设置输出3个数字的组合。
vb数据的输入、输出
Yyyy
H M S tttt A/P,a/p
四位数显示年份（0100~9999）
显示小时（0~23），个位前不加0 在h后显示分（0~59），个位前不加0 显示秒（0~9），个位前不加0 显示完整时间（小时、分和秒）默认格式为 hh:mm:ss 12小时的时钟，中午前A或a，中午后P或p
q
hh mm ss AM/PM Am/pm
vbInformation
参数3 默认按钮
值 0 256 521
常 量 vbDefaultButton1 vbDefaultButton2
说 明 指定默认为第1按钮
指定默认为第2按钮 指定默认为第3按钮
vbDefaultButton3
函数的返回值 值 1 2 3 4 5 6 7 常 量 vbOK vbCancel 说 明 确定按钮 取消按钮 终止按钮 重试按钮 忽略按钮 是 否
说明： ①参数n为数值表达式，其值为一整数，它是下一个 输出位置的列号，表示在输出前把光标（或打印 头）移到该列。通常最左边的列号为1，如果当前 的显示位置已经超过n，则自动下移一行。 ②在VB中，对参数n的取值范围没有具体限制。当n 比行宽大时，显示位置为n Mod行宽；如果n<1， 则把输出位置移到第一列。 ③当在一个Print方法中有多个Tab函数时，每个Tab 函数对应一个输出项，各输出项之间用分号隔开。
E-
数值型格式实例：
Private Sub Form_Click() Print Format(123.45, "0000.000") Print Format(123.45, "0.0")
Print Format(123.46, "0.0")
VB_编程入门教程基础
编程有两个方面的要求: 一 需要理解编程的任务并给出算法 二 要使用特定的计算机语言具体地表示这些 算法。
4
VB_编程入门教程基础
2.2 一个简单的加法器程序 1．加法器界面设计
5
VB_编程入门教程基础
2．编写程序代码
标题 对象列表框
光标
6
过程列表框
过程分界线
程序员在此编写代码
VB_编程入门教程基础
2
VB_编程入门教程基础
本章主要内容: 确定数据的性质：数据类型 两种数据表达：常量和变量 算术运算符和表达式 VB编程的开始：使用窗体 赋值和输入输出
3
VB_编程入门教程基础
2.1 概 述
所谓编程就是针对要解决的任务，设计解决问 题的步骤，使用计算机程序设计语言进行描述，最 后通过编码、测试、修改等过程实现编程的目的。
逻辑型(Boolean) 逻辑型又称布尔型，其数据只有True(真)和
False(假)两个值逻辑值和数值类型进行转换的时 候，它们是非对称的： （1）数值数据转换为布尔值时，0对应False，非 0对应为True （2）布尔值转换为数值数据时，False对应0， True对应为 -1。
13
VB_编程入门教程基础
数据是程序处理的对象。为了更好地 处理各种各样的数据，VB定义了多种数据 类型，数据类型定义了值的范围并确定了 它能够进行的操作。
8
VB_编程入门教程基础
数据类型 9
数值型
整数: 整型/长整型 字节型 浮点型: 单/双精度 货币型
字符型 逻辑型 日期型 对象型 变体型
VB_编程入门教程基础
1. 字节型(Byte) 字节型数可以表示无符号的整数，0～255
如我们已知的：As，Dim，Private，Sub，End， Integer ， Long ， String ， Option Explicit ， Date，Const，……等等。
4
VB_编程入门教程基础
2.2 一个简单的加法器程序 1．加法器界面设计
5
VB_编程入门教程基础
2．编写程序代码
标题 对象列表框
光标
6
过程列表框
过程分界线
程序员在此编写代码
VB_编程入门教程基础
2
VB_编程入门教程基础
本章主要内容: 确定数据的性质：数据类型 两种数据表达：常量和变量 算术运算符和表达式 VB编程的开始：使用窗体 赋值和输入输出
3
VB_编程入门教程基础
2.1 概 述
所谓编程就是针对要解决的任务，设计解决问 题的步骤，使用计算机程序设计语言进行描述，最 后通过编码、测试、修改等过程实现编程的目的。
逻辑型(Boolean) 逻辑型又称布尔型，其数据只有True(真)和
False(假)两个值逻辑值和数值类型进行转换的时 候，它们是非对称的： （1）数值数据转换为布尔值时，0对应False，非 0对应为True （2）布尔值转换为数值数据时，False对应0， True对应为 -1。
13
VB_编程入门教程基础
数据是程序处理的对象。为了更好地 处理各种各样的数据，VB定义了多种数据 类型，数据类型定义了值的范围并确定了 它能够进行的操作。
8
VB_编程入门教程基础
数据类型 9
数值型
整数: 整型/长整型 字节型 浮点型: 单/双精度 货币型
字符型 逻辑型 日期型 对象型 变体型
VB_编程入门教程基础
1. 字节型(Byte) 字节型数可以表示无符号的整数，0～255
如我们已知的：As，Dim，Private，Sub，End， Integer ， Long ， String ， Option Explicit ， Date，Const，……等等。
第3章 Visual Basic数据的输入与输出
3-2 例3-2运行界面 程序代码如下: Private Sub Command1_Click() Picture3.Picture = Picture1.Picture Picture1.Picture = Picture2.Picture Picture2.Picture = Picture3.Picture Picture3.Picture = LoadPicture() End Sub 其中 ,Picture3.Picture=LoadPicture （）语句的作用是在 Picture3 图片框中使用 LoadPicture 函数装入一个空图片。 3.1.2. InputBox 函数 InPutBox函数是提供从键盘输入数据的函数。 该函数在执行过程中会产生一个对话框,等待用户在 该对话框中输入数据,并返回所输入的内容。 格式:InputBox（提示信息[,对话框标题][,默认内容][,x坐标位置][,y坐标位置]）。 功能:提供一个简单的对话框,供用户输入信息。 几点说明: (1)提示信息:必选项,为字符串表达式,在对话框中作为提示用户操作的信息。 （2）对话框标题:可选项,为字符串表达式,用于对话框标题的显示。如果省略,则把应用程序名作 为对话框的标题。 （3） 默认内容:可选项,为字符串表达式,在没有输入前作为缺省内容显示在输入文本框中,如果省
第3章
学习内容
输入输出的概念 赋值语句 InputBox函数 Print语句及输出格式 与Print语句相关的函数 Print的其他方法和属性 字形 MsgBox函数和MsgBox输入与输出
学习目标
掌握 Print方法以及 InputBox函数和MsgBox函数的一般用法,了解与打印机输出有关的属性和方 法。
3.2 数据输出
程序运行后,应将执行的结果显示给用户,这就需要进行数据的输出操作。在Visual Basic中,一般 使用Print语句、MsgBox函数和MsgBox以及其他方法和属性,例如,使用文本框、标签等实现输出操 作。 3.2.1 Print 语句 在程序中使用Print语句可将文本字符串、变量值或表达式值在窗体、图形对象或打印机上输出。 1.Print语句的格式和用法 格式:[对象名.]Print[[表达式表],|；] Print语句的格式和功能与BASIC语言中的Print语句类似,都可用来输出操作。 几点说明: (1)对象名:可以是窗体（Form）、图片框（PictureBox）或打印机（Printer）,也可以是立即窗 口（Debug）。如果省略了“对象名”,则系统默认在当前窗体上输出。 例如: Print“学习 Visual Basic” ‘在当前窗体上显示“学习 Visual Basic字符串”。 Picturel.Print“学习 visual Basic6.0” ‘在当前窗体的 Picturel图片框内显示“学习 Visual Basic6. 0”字符串。 Printer.Print“学习 visual Basic6.0” ‘在 Printer（打印机）上打印输出“学习 Visual Basic6.0”。 Debug.Print“学习 Visual Basic6.0” ‘在立即窗口中输出“学习 Visual Basic6.0”。 (2)表达式表:可以是一个变量名或多个变量名,也可以是一个表达式或多个表达式。 表达式可以是 数值表达式或字符串表达式。当输出对象为数值表达式时,打印输出该表达式的值,当输出对象为 字符串表达式时,打印输出该字符串的原样。如果省略“表达式表”,则输出一个空行。 例如: a=23.56:b=127:C=189 Print a ‘在当前窗口输出变量 a的值 Print ‘输出一个空行 Print “欢迎来到vb世界！” ‘输出引号内的“欢迎来到vb世界！”字符串 (3)当输出多个表达式或变量时,各表达式或变量之间需要使用分隔符（“,”、“；”或空格,英 文状态输入）间隔。其中,逗号（“,”）分隔:按标准格式（分区格式）输出,即各数据项占12位 字符；分号（“；”）或空格分隔:按紧凑格式输出,当输出数值型数据时,在该数值前留一个符号 位,数值后留一个空格,当输出字符串时,前后都不留空格。例如: A=23.56:b=127:C=189 Print a,b,c,“Print的标准格式” Print Print a； b； c；“Print的紧凑格式”
VB教程 使用文本框和标签输入输出文字信息
第五章 使用文本框和标签输入输出文字信息
清除按钮的click代码
Private Sub Command1_Click() Text1.Text = "" Text2.Text = "" Text3.Text = "“ Text1.SetFocus End Sub
退出按钮的click代码
Private Sub Command2_Click() End End Sub
第五章 使用文本框和标签输入输出文字信息
2、设置密码 例3
第五章 使用文本框和标签输入输出文字信息
清除按钮的click代码
Private Sub Command1_Click() Text1.Text = "" Text2.Text = "" Text1.SetFocus End Sub
退出按钮的click代码
Private Sub Command2_Click() End End Sub
第五章 使用文本框和标签输入输出文字ቤተ መጻሕፍቲ ባይዱ息
校验密码按钮的click代码
Private Sub Command2_Click() pass$ = Text1.Text If pass$ = "password" Then Text2.Text = "密码正确，继续进行" Else Text2.Text = "密码错误，重新输入" End If End Sub
第五章 使用文本框和标签输入输出文字信息
5.1.2 文本框的属性、事件和方法 1.Change事件
改变文本框的Text属性时会引发该事件。当输入一 个字符，就会触发一次Change事件。
vb 数据的输入输出
其他方法与属性
Textheight与textwidth方法 语法格式：[对象.]textheight 返回字符串的高度 [对象.]textwidth 返回字符串的宽度 分析：根据在vb中的默认字体大小，求出”microsoft”高度，并乘以6 作为下一个print位置的纵坐标，把横坐标设置为0，因此字符串 microsoft visual basic 6在第七行第一列显示，接下来显示字符串 的高度与宽度。 注意:在字符串中含有回车（asc码13）、换行（asc码10）字符时， 字符串的高度随之增加，回车换行如下所示： Chr(13)+chr(10) 字符串有几个回车换行其高度增加几倍。 例子：使输出字符串居中显示
Msgbox函数说明
1、msgbox函数的第二个参数的第三类数值用来确定默认活动按钮。 2、msgbox函数的显示信息最多不超过1024个字符，所显示的信息 自动换行，并能自动调整大小。如果由于格式要求换行则必须加 回车换行符。 3、在应用程中，msgbox函数的返回值通常用来作为继续执行程序的 依据，根据返回值决定后面的操作。
数据的输入输出
数据输出-print方法
print 方法 可以在窗体上显示文本字符串和表达式的值，并可在其他 图形对象上或打印机上输出信息。格式： [对象名称.]print[表达式][,|;] 说明： 1、对象名称可以是窗体、图片框或打印机，也可以是立即窗口。如 果省略对象名称则在当前窗体上输出。 2、表达式可以是一个或多个表达式，可以是数值表达式或字符串。 3、当输出多个表达式或字符串时个表达式用分隔符（逗号，分号或 空格）隔开。 4、print 具有计算和输出双重功能，对于表达式先计算后输出。 5、一般情况下每执行一次print方法都要自动换行。若需要在同一行 上输出，可以在末尾加上一个分号或逗号。
VB数据输出和输入
VB数据输出和输入一、数据输出——print1、Print方法：可以在窗体上显示文本字符串和表达式的值，并可在其他图形对象或打印机上输出信息。
其一般格式为：[对象名.]print[表达式][，│;]（1）、这里的“对象名”可是以是窗体（form）、图片框（picture）、或打印机（printer），也可以是立即窗口（debug）。
如果省略对象名，则在当前窗体上输出。
（2）、“表达式”是一个或多个表达式，可以是数值表达式或字符串。
对于数据表达式，输出表达式的值；而字符串则照原样输出。
如果省略“表达式”，则输出一个空行。
当输出多个表达式或字符串时，各表达式用分隔符（逗号、分号或空格）隔开。
如果输出的各表达式之间用逗号（，）分隔，则按标准输出格式（分区输出格式）显示数据项。
即以14个字符位置为单位把一个输出行分为若干个区段，逗号（，）后面的表达式在下一个区段输出。
如果各输出项之间用分号（；）或空格作分隔符，则按紧凑输出格式输出数据。
2、与print方法有关的函数为了使信息按指定的格式输出，Visual Basic提供了几个与print 配合使用的函数，包括Tab、Spc、Space$和format$，这些函数可以与Print方法配合使用。
（1）、Tab函数。
格式：Tab（n）。
把光标移到参数n指定的位置开始输出信息。
例如：print tab(10);123 将在第10个字符位置处输出数据123。
（2）、Spc函数。
格式：Spc(n)。
在print输出中，用Spc函数可以跳过n个空格。
说明：①、参数n是一个数值表达式。
其取值范围为0~32767的整数。
Spc函数与输出项之间用分号隔开。
例如：print “你好”；Spc(8);”中国”将首先输出“你好”，然后跳过8个空格，再输出“中国”。
②、Spc函数和Tab函数作用类似，而且可以互相代替。
但是，Tab函数需要从对象的左端开始计数。
而Spc函数只表示两个输出项之间的间隔。
Vb编程入门
Vb编程入门一、编写程序的基本思路1、人脑处理问题的过程以“9+19+28=？”为例第一步：收集信息第二步：处理信息第三步：输出结果2、编写程序解决问题的思路与人脑处理问题的思路相同第一步：数据输入可以通过TextBox(文本框)控件的Text属性或通过赋值语句输入数据(1) 赋值语句用于输入已知确定的数据;(2) 用TextBox用于输入暂时不确定或变化的数据。
**注意**用TextBox输入的数据是字符型，若要进行数值计算则要先转换成数值型（用VAL函数）第二步：数据处理一般用用赋值语句进行计算处理或者用以后学的知识进行处理第三步：数据输出用Label控件的Caption属性或TextBox的Text属性进行输出代码书写格式如下：控件名.Caption=”要输出的内容”（用Label控件输出）控件名.Text=”要输出的内容”（用TextBox控件输出）**注意**若输出变量的类型是数值型时，要用STR（）函数转换成字符型。
二、VB编写程序步骤分析问题，确定程序要完成什么任务，按下面的步骤创建应用程序。
举例: 已知圆的半径，求圆的周长和面积。
（1）新建工程。
创建一个应用程序首先要打开一个新的工程。
（2）创建应用程序界面。
A、要用几个控件B、版面如何布局C、各控件的“职责”、摆放位置（3）设置属性值。
A、名称属性B、Cation、TextBox等属性的值C、字号、字体、颜色、背景色等属性......（4）对象事件过程的编程。
A、代码应写在哪一个控件上，即事件发生在哪一个控件上B、确定解决问题的思路C、写代码（要注意变量的定义）（5）保存文件。
（6）程序运行与调试，生成EXE文件。
三、练习：已知圆的半径，求圆的周长和面积。
四、作业：鸡兔同笼。
已知笼中鸡兔总头数为h，总脚数为f，问鸡兔各有多少只？分析：设鸡有x只，兔有y只，则方程如下：解方程。
解出求x和y的具体方式为：设计界面和运行界面，如图所示。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
输入对话框 输出对话框
3.2 数据输入输出函数和过程
InputBox()函数
作用：InputBox()函数产生一个输入框，等待 用户输入数据或按下按钮，并返回所输入的内 容。 格式：InputBox(提示[,标题][,默认值][,x坐标 位置][, y坐标位置])
例3-3
案例1
某商场营业员的总工资由两部分组成：基本工
描 确定按钮
述
按钮 数目
确定、取消按钮 终止、重试、忽略按钮 是、否、取消按钮 是、否按钮 重试、取消按钮 关键信息图标 询问信息图标 警告信息图标 信息图标 第1个按钮为默认 第2个按钮为默认 第3个按钮为默认
在输入“提示” 参数时若要显 示多行，可在 每行文字末尾 加上Chr(13)和 Chr(10)
资和营业额提成。基本工资一般为300元；营业额 提成是营业额的5%。要求输入基本工资、本月的
营业额，显示实发工资。要求单击窗体后，从输
入框分别输入每月基本工资与本月营业额，然后 将每月实发工资显示在标签中。
运行效果如下图所示所示，分别在输入框输入基本工 资1000与营业额4000，单击“确定”后，则所发 工资显示在标签中。
MsgBox()函数返回一个整型值，而MsgBox过程无返 回值。
本章小结
掌握输出的方法：Print方法 掌握InputBox,MsgBox函数的使用 学会利用InputBox函数和MsgBox函数 实现人机交互
举例如下： Private Sub Form_click() x=3:y=6:z=12 Print “0123456789012345678901234567890123456789” Print x,y,”abc”,”def” Print “abc”,”def”,x,y Print “0123456789012345678901234567890123456789” Print x;y;”abc”;”def” Print “abc”;”def”;x;y Print “z/(y/x)=”; z/(y/x) End Sub
v = msgBox(“是否保存对
v = msgBox(“是否保存对
文档1的修改”，
vbYesNoCancel+VBExclamation,
”Microsoft Office Word”)
文档1的修改”， 3+48, ”Microsoft Office Word”)
总结：‘按钮’参数可以由内部常数和数值两种形式表 示。
图标 类型 默认 按钮
VBQuestion VBExclamation VBInformation VBDefaultButton1 VBDefaultButton2 VBDefaultButton3
举例:
v = msgBox(“是否保存对文档1的修改”， vbYesNoCancel+VBExclamation ， ”Microsoft Office Word”)
案例2
编一账号和密码输入的检验程序，当输入密码 不正确时，出现消息框显示有关信息。运行结 果如下图所示：
Code
MsgBox过程
作用： MsgBox过程产生一个消息框，向用户传送信 息，并可通过用户在对话框上的选择，接收用户所做 的响应，无返回值。 格式： MsgBox 提示[,按钮、图标的类型][,标题] MsgBox()函数与Msgbox过程的区别：
Code
注意事项
记住InputBox()函数的常用参数按顺序分别是： 提示信息，对话框标题，输入区缺省值
注意参数间用英文状态的逗号
函数返回字符串类型。
课堂练习
通过InputBox函数输入圆的半径，计 算圆的周长和面积，将结果输出到标签 中。
当在word中进行文档操作时，若不小心按 下关闭按钮，系统如何做？
例如： Print “Hello”;Tab(10);”world” Print “Hello”;Spc(10);”world” Print Tab(4);”Hello”;Tab;”world”
print方法适合适合直接在窗体控件上输出文 本，若要用输出对话框的形式输入输出数据， 如何解决呢？
MsgBox函数
函数形式：变量[%] = MsgBox(提示[,按钮][，标题])
MsgBox按钮和图标设置
分组
内部常数 VBOkOnly VBOkCancel VBAboutRetryIgnore VBYesNoCancel VBYesNo VBRetryCancel VBCritical
值 0 1 2 3 4 5 16 32 48 64 0 56 512
注意事项
若要省略按钮样式，必须把位置给空出来。 如： MsgBox(“结果有误”，，”出错了”) MsgBox函数的返回值必须赋值给一个变量 在设计按钮样式时，注意考虑提示信息与按钮的 匹配性
课堂练习
针对如下对话框Βιβλιοθήκη 出MsgBox函数的各个参数MsgBox()所选按钮返回值
内部常数 vbOk vbCancel vbAbort vbRetry vbIgnore vbYes vbNo 返回值 1 2 3 4 5 6 7 被单击的按 钮 确定 取消 终止 重试 忽略 是 否
观察发现：上述例题的输出每一次输出都从最 左边开始，如何实现如word中的缩进或跳格呢？
Spc(n)和Tab(n)函数
Spc(n)函数：插入n个空格，允许重复使用。 Tab(n)函数：左端开始右移动n列，允许重 复使用。 Tab(n)从最左第一列算起定位于第n列，若 当前打印位置已超过n列，则定位于下一行 的第n列。 Spc(n)从前一位置起空n个空格。
第三章 数据输入输出
主要内容：
Print函数、Tab函数、Spc函数的用法 InputBox函数、MsgBox函数的用法
本章重难点
重点： Print函数，InputBox函数，MsgBox函数的用法 难点： 1.MsgBox函数中的参数设置，以及返回值的运 用 2.如何利用InputBox函数、MsgBox函数实现用 户和计算机之间的交互
对象：窗体、图形框或打印机(Printer) ，省略对象在 窗体上输出。 ；(分号)：光标定位在上一个显示的字符后。 ，(逗号)：光标定位在下一个打印区的开始位置处。 无 ；，时换行。 先计算表达式的值，然后输出该值
注 意
Print方法在Form _Load事 件过程中起作用，必须设 置窗体的AutoRedraw为 True。
前述内容回顾
在前面章节所学习的对象中，能够进行输入数 据的有文本框；
可以输出数据的有按钮、标签。
这些控件适合输入或输出简单少量文字内容， 若要在窗体上直接输出如下形式文本， 如何解决呢？
3.1 数据输出方法
1、 Print方法 形式： [对象.]Print [表达式列表][；|，] 作用：在对象上输出信息 说明：
3.2 数据输入输出函数和过程
InputBox()函数
作用：InputBox()函数产生一个输入框，等待 用户输入数据或按下按钮，并返回所输入的内 容。 格式：InputBox(提示[,标题][,默认值][,x坐标 位置][, y坐标位置])
例3-3
案例1
某商场营业员的总工资由两部分组成：基本工
描 确定按钮
述
按钮 数目
确定、取消按钮 终止、重试、忽略按钮 是、否、取消按钮 是、否按钮 重试、取消按钮 关键信息图标 询问信息图标 警告信息图标 信息图标 第1个按钮为默认 第2个按钮为默认 第3个按钮为默认
在输入“提示” 参数时若要显 示多行，可在 每行文字末尾 加上Chr(13)和 Chr(10)
资和营业额提成。基本工资一般为300元；营业额 提成是营业额的5%。要求输入基本工资、本月的
营业额，显示实发工资。要求单击窗体后，从输
入框分别输入每月基本工资与本月营业额，然后 将每月实发工资显示在标签中。
运行效果如下图所示所示，分别在输入框输入基本工 资1000与营业额4000，单击“确定”后，则所发 工资显示在标签中。
MsgBox()函数返回一个整型值，而MsgBox过程无返 回值。
本章小结
掌握输出的方法：Print方法 掌握InputBox,MsgBox函数的使用 学会利用InputBox函数和MsgBox函数 实现人机交互
举例如下： Private Sub Form_click() x=3:y=6:z=12 Print “0123456789012345678901234567890123456789” Print x,y,”abc”,”def” Print “abc”,”def”,x,y Print “0123456789012345678901234567890123456789” Print x;y;”abc”;”def” Print “abc”;”def”;x;y Print “z/(y/x)=”; z/(y/x) End Sub
v = msgBox(“是否保存对
v = msgBox(“是否保存对
文档1的修改”，
vbYesNoCancel+VBExclamation,
”Microsoft Office Word”)
文档1的修改”， 3+48, ”Microsoft Office Word”)
总结：‘按钮’参数可以由内部常数和数值两种形式表 示。
图标 类型 默认 按钮
VBQuestion VBExclamation VBInformation VBDefaultButton1 VBDefaultButton2 VBDefaultButton3
举例:
v = msgBox(“是否保存对文档1的修改”， vbYesNoCancel+VBExclamation ， ”Microsoft Office Word”)
案例2
编一账号和密码输入的检验程序，当输入密码 不正确时，出现消息框显示有关信息。运行结 果如下图所示：
Code
MsgBox过程
作用： MsgBox过程产生一个消息框，向用户传送信 息，并可通过用户在对话框上的选择，接收用户所做 的响应，无返回值。 格式： MsgBox 提示[,按钮、图标的类型][,标题] MsgBox()函数与Msgbox过程的区别：
Code
注意事项
记住InputBox()函数的常用参数按顺序分别是： 提示信息，对话框标题，输入区缺省值
注意参数间用英文状态的逗号
函数返回字符串类型。
课堂练习
通过InputBox函数输入圆的半径，计 算圆的周长和面积，将结果输出到标签 中。
当在word中进行文档操作时，若不小心按 下关闭按钮，系统如何做？
例如： Print “Hello”;Tab(10);”world” Print “Hello”;Spc(10);”world” Print Tab(4);”Hello”;Tab;”world”
print方法适合适合直接在窗体控件上输出文 本，若要用输出对话框的形式输入输出数据， 如何解决呢？
MsgBox函数
函数形式：变量[%] = MsgBox(提示[,按钮][，标题])
MsgBox按钮和图标设置
分组
内部常数 VBOkOnly VBOkCancel VBAboutRetryIgnore VBYesNoCancel VBYesNo VBRetryCancel VBCritical
值 0 1 2 3 4 5 16 32 48 64 0 56 512
注意事项
若要省略按钮样式，必须把位置给空出来。 如： MsgBox(“结果有误”，，”出错了”) MsgBox函数的返回值必须赋值给一个变量 在设计按钮样式时，注意考虑提示信息与按钮的 匹配性
课堂练习
针对如下对话框Βιβλιοθήκη 出MsgBox函数的各个参数MsgBox()所选按钮返回值
内部常数 vbOk vbCancel vbAbort vbRetry vbIgnore vbYes vbNo 返回值 1 2 3 4 5 6 7 被单击的按 钮 确定 取消 终止 重试 忽略 是 否
观察发现：上述例题的输出每一次输出都从最 左边开始，如何实现如word中的缩进或跳格呢？
Spc(n)和Tab(n)函数
Spc(n)函数：插入n个空格，允许重复使用。 Tab(n)函数：左端开始右移动n列，允许重 复使用。 Tab(n)从最左第一列算起定位于第n列，若 当前打印位置已超过n列，则定位于下一行 的第n列。 Spc(n)从前一位置起空n个空格。
第三章 数据输入输出
主要内容：
Print函数、Tab函数、Spc函数的用法 InputBox函数、MsgBox函数的用法
本章重难点
重点： Print函数，InputBox函数，MsgBox函数的用法 难点： 1.MsgBox函数中的参数设置，以及返回值的运 用 2.如何利用InputBox函数、MsgBox函数实现用 户和计算机之间的交互
对象：窗体、图形框或打印机(Printer) ，省略对象在 窗体上输出。 ；(分号)：光标定位在上一个显示的字符后。 ，(逗号)：光标定位在下一个打印区的开始位置处。 无 ；，时换行。 先计算表达式的值，然后输出该值
注 意
Print方法在Form _Load事 件过程中起作用，必须设 置窗体的AutoRedraw为 True。
前述内容回顾
在前面章节所学习的对象中，能够进行输入数 据的有文本框；
可以输出数据的有按钮、标签。
这些控件适合输入或输出简单少量文字内容， 若要在窗体上直接输出如下形式文本， 如何解决呢？
3.1 数据输出方法
1、 Print方法 形式： [对象.]Print [表达式列表][；|，] 作用：在对象上输出信息 说明：