VB数据输入输出
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
输入对话框 输出对话框
3.2 数据输入输出函数和过程
InputBox()函数
作用：InputBox()函数产生一个输入框，等待 用户输入数据或按下按钮，并返回所输入的内 容。 格式：InputBox(提示[,标题][,默认值][,x坐标 位置][, y坐标位置])
例3-3
案例1
某商场营业员的总工资由两部分组成：基本工
第三章 数据输入输出
主要内容：
Print函数、Tab函数、Spc函数的用法 InputBox函数、MsgBox函数的用法
本章重难点
重点： Print函数，InputBox函数，MsgBox函数的用法 难点： 1.MsgBox函数中的参数设置，以及返回值的运 用 2.如何利用InputBox函数、MsgBox函数实现用 户和计算机之间的交互
v = msgBox(“是否保存对
v = msgBox(“是否保存对
文档1的修改”，
vbYesNoCancel+VBExclamation,
”Microsoft Office Word”)
文档1的修改”， 3+48, ”Microsoft Office Word”)
总结：‘按钮’参数可以由内部常数和数值两种形式表 示。
Code
Fra Baidu bibliotek
注意事项
记住InputBox()函数的常用参数按顺序分别是： 提示信息，对话框标题，输入区缺省值
注意参数间用英文状态的逗号
函数返回字符串类型。
课堂练习
通过InputBox函数输入圆的半径，计 算圆的周长和面积，将结果输出到标签 中。
当在word中进行文档操作时，若不小心按 下关闭按钮，系统如何做？
MsgBox()函数返回一个整型值，而MsgBox过程无返 回值。
本章小结
掌握输出的方法：Print方法 掌握InputBox,MsgBox函数的使用 学会利用InputBox函数和MsgBox函数 实现人机交互
注意事项
若要省略按钮样式，必须把位置给空出来。 如： MsgBox(“结果有误”，，”出错了”) MsgBox函数的返回值必须赋值给一个变量 在设计按钮样式时，注意考虑提示信息与按钮的 匹配性
课堂练习
针对如下对话框写出MsgBox函数的各个参数
MsgBox()所选按钮返回值
内部常数 vbOk vbCancel vbAbort vbRetry vbIgnore vbYes vbNo 返回值 1 2 3 4 5 6 7 被单击的按 钮 确定 取消 终止 重试 忽略 是 否
描 确定按钮
述
按钮 数目
确定、取消按钮 终止、重试、忽略按钮 是、否、取消按钮 是、否按钮 重试、取消按钮 关键信息图标 询问信息图标 警告信息图标 信息图标 第1个按钮为默认 第2个按钮为默认 第3个按钮为默认
在输入“提示” 参数时若要显 示多行，可在 每行文字末尾 加上Chr(13)和 Chr(10)
观察发现：上述例题的输出每一次输出都从最 左边开始，如何实现如word中的缩进或跳格呢？
Spc(n)和Tab(n)函数
Spc(n)函数：插入n个空格，允许重复使用。 Tab(n)函数：左端开始右移动n列，允许重 复使用。 Tab(n)从最左第一列算起定位于第n列，若 当前打印位置已超过n列，则定位于下一行 的第n列。 Spc(n)从前一位置起空n个空格。
资和营业额提成。基本工资一般为300元；营业额 提成是营业额的5%。要求输入基本工资、本月的
营业额，显示实发工资。要求单击窗体后，从输
入框分别输入每月基本工资与本月营业额，然后 将每月实发工资显示在标签中。
运行效果如下图所示所示，分别在输入框输入基本工 资1000与营业额4000，单击“确定”后，则所发 工资显示在标签中。
举例如下： 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
案例2
编一账号和密码输入的检验程序，当输入密码 不正确时，出现消息框显示有关信息。运行结 果如下图所示：
Code
MsgBox过程
作用： MsgBox过程产生一个消息框，向用户传送信 息，并可通过用户在对话框上的选择，接收用户所做 的响应，无返回值。 格式： MsgBox 提示[,按钮、图标的类型][,标题] MsgBox()函数与Msgbox过程的区别：
前述内容回顾
在前面章节所学习的对象中，能够进行输入数 据的有文本框；
可以输出数据的有按钮、标签。
这些控件适合输入或输出简单少量文字内容， 若要在窗体上直接输出如下形式文本， 如何解决呢？
3.1 数据输出方法
1、 Print方法 形式： [对象.]Print [表达式列表][；|，] 作用：在对象上输出信息 说明：
图标 类型 默认 按钮
VBQuestion VBExclamation VBInformation VBDefaultButton1 VBDefaultButton2 VBDefaultButton3
举例:
v = msgBox(“是否保存对文档1的修改”， vbYesNoCancel+VBExclamation ， ”Microsoft Office Word”)
MsgBox函数
函数形式：变量[%] = MsgBox(提示[,按钮][，标题])
MsgBox按钮和图标设置
分组
内部常数 VBOkOnly VBOkCancel VBAboutRetryIgnore VBYesNoCancel VBYesNo VBRetryCancel VBCritical
值 0 1 2 3 4 5 16 32 48 64 0 56 512
对象：窗体、图形框或打印机(Printer) ，省略对象在 窗体上输出。 ；(分号)：光标定位在上一个显示的字符后。 ，(逗号)：光标定位在下一个打印区的开始位置处。 无 ；，时换行。 先计算表达式的值，然后输出该值
注 意
Print方法在Form _Load事 件过程中起作用，必须设 置窗体的AutoRedraw为 True。
例如： Print “Hello”;Tab(10);”world” Print “Hello”;Spc(10);”world” Print Tab(4);”Hello”;Tab;”world”
print方法适合适合直接在窗体控件上输出文 本，若要用输出对话框的形式输入输出数据， 如何解决呢？
3.2 数据输入输出函数和过程
InputBox()函数
作用：InputBox()函数产生一个输入框，等待 用户输入数据或按下按钮，并返回所输入的内 容。 格式：InputBox(提示[,标题][,默认值][,x坐标 位置][, y坐标位置])
例3-3
案例1
某商场营业员的总工资由两部分组成：基本工
第三章 数据输入输出
主要内容：
Print函数、Tab函数、Spc函数的用法 InputBox函数、MsgBox函数的用法
本章重难点
重点： Print函数，InputBox函数，MsgBox函数的用法 难点： 1.MsgBox函数中的参数设置，以及返回值的运 用 2.如何利用InputBox函数、MsgBox函数实现用 户和计算机之间的交互
v = msgBox(“是否保存对
v = msgBox(“是否保存对
文档1的修改”，
vbYesNoCancel+VBExclamation,
”Microsoft Office Word”)
文档1的修改”， 3+48, ”Microsoft Office Word”)
总结：‘按钮’参数可以由内部常数和数值两种形式表 示。
Code
Fra Baidu bibliotek
注意事项
记住InputBox()函数的常用参数按顺序分别是： 提示信息，对话框标题，输入区缺省值
注意参数间用英文状态的逗号
函数返回字符串类型。
课堂练习
通过InputBox函数输入圆的半径，计 算圆的周长和面积，将结果输出到标签 中。
当在word中进行文档操作时，若不小心按 下关闭按钮，系统如何做？
MsgBox()函数返回一个整型值，而MsgBox过程无返 回值。
本章小结
掌握输出的方法：Print方法 掌握InputBox,MsgBox函数的使用 学会利用InputBox函数和MsgBox函数 实现人机交互
注意事项
若要省略按钮样式，必须把位置给空出来。 如： MsgBox(“结果有误”，，”出错了”) MsgBox函数的返回值必须赋值给一个变量 在设计按钮样式时，注意考虑提示信息与按钮的 匹配性
课堂练习
针对如下对话框写出MsgBox函数的各个参数
MsgBox()所选按钮返回值
内部常数 vbOk vbCancel vbAbort vbRetry vbIgnore vbYes vbNo 返回值 1 2 3 4 5 6 7 被单击的按 钮 确定 取消 终止 重试 忽略 是 否
描 确定按钮
述
按钮 数目
确定、取消按钮 终止、重试、忽略按钮 是、否、取消按钮 是、否按钮 重试、取消按钮 关键信息图标 询问信息图标 警告信息图标 信息图标 第1个按钮为默认 第2个按钮为默认 第3个按钮为默认
在输入“提示” 参数时若要显 示多行，可在 每行文字末尾 加上Chr(13)和 Chr(10)
观察发现：上述例题的输出每一次输出都从最 左边开始，如何实现如word中的缩进或跳格呢？
Spc(n)和Tab(n)函数
Spc(n)函数：插入n个空格，允许重复使用。 Tab(n)函数：左端开始右移动n列，允许重 复使用。 Tab(n)从最左第一列算起定位于第n列，若 当前打印位置已超过n列，则定位于下一行 的第n列。 Spc(n)从前一位置起空n个空格。
资和营业额提成。基本工资一般为300元；营业额 提成是营业额的5%。要求输入基本工资、本月的
营业额，显示实发工资。要求单击窗体后，从输
入框分别输入每月基本工资与本月营业额，然后 将每月实发工资显示在标签中。
运行效果如下图所示所示，分别在输入框输入基本工 资1000与营业额4000，单击“确定”后，则所发 工资显示在标签中。
举例如下： 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
案例2
编一账号和密码输入的检验程序，当输入密码 不正确时，出现消息框显示有关信息。运行结 果如下图所示：
Code
MsgBox过程
作用： MsgBox过程产生一个消息框，向用户传送信 息，并可通过用户在对话框上的选择，接收用户所做 的响应，无返回值。 格式： MsgBox 提示[,按钮、图标的类型][,标题] MsgBox()函数与Msgbox过程的区别：
前述内容回顾
在前面章节所学习的对象中，能够进行输入数 据的有文本框；
可以输出数据的有按钮、标签。
这些控件适合输入或输出简单少量文字内容， 若要在窗体上直接输出如下形式文本， 如何解决呢？
3.1 数据输出方法
1、 Print方法 形式： [对象.]Print [表达式列表][；|，] 作用：在对象上输出信息 说明：
图标 类型 默认 按钮
VBQuestion VBExclamation VBInformation VBDefaultButton1 VBDefaultButton2 VBDefaultButton3
举例:
v = msgBox(“是否保存对文档1的修改”， vbYesNoCancel+VBExclamation ， ”Microsoft Office Word”)
MsgBox函数
函数形式：变量[%] = MsgBox(提示[,按钮][，标题])
MsgBox按钮和图标设置
分组
内部常数 VBOkOnly VBOkCancel VBAboutRetryIgnore VBYesNoCancel VBYesNo VBRetryCancel VBCritical
值 0 1 2 3 4 5 16 32 48 64 0 56 512
对象：窗体、图形框或打印机(Printer) ，省略对象在 窗体上输出。 ；(分号)：光标定位在上一个显示的字符后。 ，(逗号)：光标定位在下一个打印区的开始位置处。 无 ；，时换行。 先计算表达式的值，然后输出该值
注 意
Print方法在Form _Load事 件过程中起作用，必须设 置窗体的AutoRedraw为 True。
例如： Print “Hello”;Tab(10);”world” Print “Hello”;Spc(10);”world” Print Tab(4);”Hello”;Tab;”world”
print方法适合适合直接在窗体控件上输出文 本，若要用输出对话框的形式输入输出数据， 如何解决呢？