VB数据输入输出
合集下载
一、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方法都要自动换行。若需要在同一行 上输出，可以在末尾加上一个分号或逗号。
- 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 [表达式列表][；|，] 作用：在对象上输出信息 说明：