msgbox 使用
作者:admin 日期:2008-02-28
MsgBox函数
MsgBox函数的作用是弹出一个对话框,在其中显示的指定的数据和提示信息。此外,该函数还可以将返回用户在此对话框做的选择,并将返回值赋给指定变量。
其语法格式为:变量=MsgBox(信息内容,对话框类型+图标类型,对话框题目)
对话框类型和图标类型为非必传参数.
button参数的取值
名称 值 功能
VbOKOnly 0 确定按钮
VbOkCancel 1 确定和取消按钮
VbAortRetryIgnore 2 终止,重试和忽略按钮
VbYesNoCancel 3 是,否和取消按钮
VbYesNo 4 重试和取消按钮
Vbretrycancel 5 重试和取消图标
VbCritical 16 停止图标
VbQuestion 32 问号(?)图标
VbExclamation 48 感叹号(!)图标
VbInformation 64 信息图标
VbDefaultButton1 0 默认按钮为第一按钮
VbDefaultButton2 256 默认按钮为第二按钮
VbDefaultButton3 512 默认按钮为第三按钮
MsgBox()的返回值
返回值 常量 按钮
1 vbOK 确定按钮
2 vbCancel 取消按钮
3 vbAbort 终止按纽
4 vbRetry 重试按钮
5 vbIgnore 忽略按钮
6 vbYes 是
7 vbNo 否
例子代码如下:
dim a
a = MsgBox ("请确认您输入的数据是否正确!" , 3+48+0 , "数据检查" )
运行效果:
MsgBox函数的作用是弹出一个对话框,在其中显示的指定的数据和提示信息。此外,该函数还可以将返回用户在此对话框做的选择,并将返回值赋给指定变量。
其语法格式为:变量=MsgBox(信息内容,对话框类型+图标类型,对话框题目)
对话框类型和图标类型为非必传参数.
button参数的取值
名称 值 功能
VbOKOnly 0 确定按钮
VbOkCancel 1 确定和取消按钮
VbAortRetryIgnore 2 终止,重试和忽略按钮
VbYesNoCancel 3 是,否和取消按钮
VbYesNo 4 重试和取消按钮
Vbretrycancel 5 重试和取消图标
VbCritical 16 停止图标
VbQuestion 32 问号(?)图标
VbExclamation 48 感叹号(!)图标
VbInformation 64 信息图标
VbDefaultButton1 0 默认按钮为第一按钮
VbDefaultButton2 256 默认按钮为第二按钮
VbDefaultButton3 512 默认按钮为第三按钮
MsgBox()的返回值
返回值 常量 按钮
1 vbOK 确定按钮
2 vbCancel 取消按钮
3 vbAbort 终止按纽
4 vbRetry 重试按钮
5 vbIgnore 忽略按钮
6 vbYes 是
7 vbNo 否
例子代码如下:
dim a
a = MsgBox ("请确认您输入的数据是否正确!" , 3+48+0 , "数据检查" )
运行效果:
[本日志由 admin 于 2008-04-09 02:28 PM 编辑]
文章来自: 本站原创
引用通告地址: http://www.is21.cn/trackback.asp?tbID=182
Tags:
文章来自: 本站原创
引用通告地址: http://www.is21.cn/trackback.asp?tbID=182
Tags:
评论: 0 | 引用: 0 | 查看次数: 1499
发表评论
你没有权限发表留言!