ACCESS基础系列-MsgBox函数用法
时 间:2018-01-29 14:01:07
作 者:张建国 ID:5612 城市:惠州
摘 要:ACCESS基础系列-MsgBox函数用法
正 文:
1. MsgBox函数
1.1 格式:
MsgBox(prompt [,buttons] [,title])
1.2 功能:
打开一个含有提示信息的对话框,框中可预设多种按钮,用户单击某个按钮,即返回一个相应的按钮常数。
1.3 说明:
1
1.1
1.2
1.3.1 :prompt为字符串表达式,用于指定在对话框中显示的信息文本。
1.3.2 :buttons为数值表达式,必须是下表中所示范围中各取值的和,用于设定对话框中的按钮、图标和默认按钮。例如4+32+256或VbYesNo+VbQuestion+vbDefaultButton2,均显示消息框具有“是”和“否”按钮两个按钮,框内显示问号图标,并且第二个按钮为默认按钮。
注意:常数是长整型数据,不能进行字符串连接。
在一组几个按钮中,按Enter键时响应的按钮称为默认按钮,它具有深色外框和虚线内框。
MsgBox函数按钮、图标设置表 |
|||
范围 |
常数 |
常数数值 |
功能描述 |
按钮种类 |
vbOKOnly |
0 |
仅有“确定”按钮 |
VbOKCancel |
1 |
“确定”和“取消”按钮 |
|
VbAbortRetryIgore |
2 |
“终止”、“重试”和“忽略”按钮 |
|
VbYesNoCancel |
3 |
“是”、“否”和“取消”按钮 |
|
VbYesNo |
4 |
“是”和“否”按钮 |
|
VbRetryCancel |
5 |
“重试”和“取消”按钮 |
|
图标 |
VbCritical |
16 |
“停止”图标 |
VbQuestion |
32 |
问号图标 |
|
VbExclamation |
48 |
惊叹号图标 |
|
VbInformation |
64 |
(i)信息图标 |
|
默认按钮 |
vbDefaultButton1 |
0 |
第一个按钮 |
vbDefaultButton2 |
256 |
第二个按钮 |
|
vbDefaultButton3 |
512 |
第三个按钮 |
1.3.3 Title为字符串表达式,用于指定对话框标题栏的显示文本。缺省该参数表示在标题栏显示Microsoft Access。
1.3.4 MsgBox函数的返回值是一个数值,用户将根据操作时按下的按钮来获得相应的返回值(返回值如下表),编码时应根据函数返回值来设置动作。
返回值表 |
||
常数 |
常数数值 |
按下按钮 |
vbOK |
1 |
确定 |
vbCancel |
2 |
取消 |
vbAbort |
3 |
放弃 |
vbRetry |
4 |
重试 |
vbIgnore |
5 |
忽略 |
vbYes |
6 |
是 |
vbNo |
7 |
否 |
1.4 示例:
多按信息框示例:设计一个过程,要求能弹出一个包含“确定”和“取消”两个按钮的确认对话框,并在用户进行选择后显示不同的信息。
Sub Test()
Dim CS,BT
BT=”消息”
‘显示“确定”和“取消”按钮,惊叹号图标,“确定”按钮置为默认按钮;返回按钮常数
CS=MsgBox(“请选择[确定]或[取消]”,1+48+0,”确认框”)
Select Case CS
Case vbOK ‘按确定按钮
MsgBox “已选[确定]”,,”消息” ‘按“确定”按钮
Case vbCancel ‘按取消按钮
MsgBox “已选[取消]”,,BT ‘按“取消按钮”
End Select
End Sub
注意:本例前后两种MsgBox函数表达了Visual Basic函数的两种调用规则:若函数作为表达式调用,其参数必须用括号括起来;若函数占一个语句行像过程一样来调用,则应省略括号,否则均会引起语法错误。
Access软件网QQ交流群 (群号:483923997) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【Access窗体导出PDF】...(04.08)
- 【Access窗体导出PDF】...(04.07)
- Access两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
- 【Access高效办公】将每个...(12.23)
- Access21点游戏源代码(12.13)
- 【Access窗体导出Exce...(11.15)
- 【Access开发】Acces...(11.14)
- 通过Access宏录入数据到选...(11.10)
学习心得
最新文章
- Access学习笔记--用Acce...(04.19)
- 【Access重复项查询示例】将A...(04.17)
- Access快速开发平台企业版--...(04.16)
- 【Access模块示例】通过模块代...(04.15)
- Access查询里面分组合计功能添...(04.13)
- 【Access删除查询】删除数字最...(04.12)
- 显示文件夹中所有文件的修改时间(04.11)
- 铁路工程管理系统;铁路工程管理小程...(04.10)
- 【Access查询示例】怎么将两个...(04.09)
- 【Access窗体导出PDF】Ac...(04.08)