加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

VBA的Msgbox使用方法

(2011-09-23 21:37:21)
标签:

默认按钮

对话框

重试

信息图标

取消

分类: Excel_GTD

最近在不断完善Excel GTD,遇到一些小问题,google一下马上就有答案,查到的东西,顺便收藏一下吧!

转自:http://hi.baidu.com/tylanbin/blog/item/6e00ebdc36a358a2cd116681.html

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 , "数据检查" )

运行效果:

http://hiphotos.baidu.com/xwx520/pic/item/72511e083716be930a7b820c.jpg

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有