二、基础篇——显示对话框(3)

3、MsgBox 函数

在对话框中显示消息,等待用户单击按钮,并返回一个Integer告诉用户单击哪一个按钮。

语法:MsgBox(prompt[,buttons] [,title] [,helpfile,context])

除第一个参数,其余都可以省略,参数意义与InputBox函数相同。

Buttons:指定显示按钮的数目及形式,使用的图标样式,默认按钮是什么以及消息框的强制回应等。如果省略,则默认值为 0。

buttons参数有下列设置值:

vbOKOnly——只显示OK按钮。

VbOKCancel——显示OKCancel按钮。

VbAbortRetryIgnore——显示Abort(异常终止)RetryIgnore(忽略按钮。

VbYesNoCancel——显示YesNoCancel按钮。

VbYesNo——显示YesNo按钮。

VbRetryCancel——显示RetryCancel按钮。


VbCritical——显示Critical Message图标。

VbQuestion——显示Warning Query图标。

VbExclamation——显示Warning Message图标。

VbInformation——显示Information Message图标。


vbDefaultButton1——第一个按钮是默认值。

vbDefaultButton2——第二个按钮是默认值。

vbDefaultButton3——第三个按钮是默认值。

vbDefaultButton4——第四个按钮是默认值。


vbApplicationModal——应用程序强制返回;应用程序一直被挂起,直到用户对消息框作出响应才继续工作。

vbSystemModal——系统强制返回;全部应用程序都被挂起,直到用户对消息框作出响应才继续工作。

vbMsgBoxHelpButton——将Help按钮添加到消息框

VbMsgBoxSetForeground——指定消息框窗口作为前景窗口

vbMsgBoxRight——文本为右对齐

vbMsgBoxRtlReading——指定文本应为在希伯来和阿拉伯语系统中的从右到左显示

第一组描述了对话框中显示的按钮的类型与数目;第二组描述了图标的样式;第三组说明哪一个按钮是默认值;而第四组则决定消息框的强制返回性。

使用时可以在每一组中选择一个形成一个buttons。

MsgBox还可以返回一个整数值。

返回值

vbOK——1

vbCancel——2

vbAbort——3

vbRetry——4

vbIgnore——5

vbYes——6

vbNo——7

示例

Sub msgbox示例 ()

        Dim intreturn As Integer

        intreturn = MsgBox("真的要退出吗?", vbYesNo + vbQuestion, "提示")

End Sub

运行结果如下:

示例

欢迎关注微信公众号:VBA入门与提高

最后编辑于
©著作权归作者所有,转载或内容合作请联系作者
  • 序言:七十年代末,一起剥皮案震惊了整个滨河市,随后出现的几起案子,更是在滨河造成了极大的恐慌,老刑警刘岩,带你破解...
    沈念sama阅读 194,088评论 5 459
  • 序言:滨河连续发生了三起死亡事件,死亡现场离奇诡异,居然都是意外死亡,警方通过查阅死者的电脑和手机,发现死者居然都...
    沈念sama阅读 81,715评论 2 371
  • 文/潘晓璐 我一进店门,熙熙楼的掌柜王于贵愁眉苦脸地迎上来,“玉大人,你说我怎么就摊上这事。” “怎么了?”我有些...
    开封第一讲书人阅读 141,361评论 0 319
  • 文/不坏的土叔 我叫张陵,是天一观的道长。 经常有香客问我,道长,这世上最难降的妖魔是什么? 我笑而不...
    开封第一讲书人阅读 52,099评论 1 263
  • 正文 为了忘掉前任,我火速办了婚礼,结果婚礼上,老公的妹妹穿的比我还像新娘。我一直安慰自己,他们只是感情好,可当我...
    茶点故事阅读 60,987评论 4 355
  • 文/花漫 我一把揭开白布。 她就那样静静地躺着,像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上,一...
    开封第一讲书人阅读 46,063评论 1 272
  • 那天,我揣着相机与录音,去河边找鬼。 笑死,一个胖子当着我的面吹牛,可吹牛的内容都是我干的。 我是一名探鬼主播,决...
    沈念sama阅读 36,486评论 3 381
  • 文/苍兰香墨 我猛地睁开眼,长吁一口气:“原来是场噩梦啊……” “哼!你这毒妇竟也来了?” 一声冷哼从身侧响起,我...
    开封第一讲书人阅读 35,175评论 0 253
  • 序言:老挝万荣一对情侣失踪,失踪者是张志新(化名)和其女友刘颖,没想到半个月后,有当地人在树林里发现了一具尸体,经...
    沈念sama阅读 39,440评论 1 290
  • 正文 独居荒郊野岭守林人离奇死亡,尸身上长有42处带血的脓包…… 初始之章·张勋 以下内容为张勋视角 年9月15日...
    茶点故事阅读 34,518评论 2 309
  • 正文 我和宋清朗相恋三年,在试婚纱的时候发现自己被绿了。 大学时的朋友给我发了我未婚夫和他白月光在一起吃饭的照片。...
    茶点故事阅读 36,305评论 1 326
  • 序言:一个原本活蹦乱跳的男人离奇死亡,死状恐怖,灵堂内的尸体忽然破棺而出,到底是诈尸还是另有隐情,我是刑警宁泽,带...
    沈念sama阅读 32,190评论 3 312
  • 正文 年R本政府宣布,位于F岛的核电站,受9级特大地震影响,放射性物质发生泄漏。R本人自食恶果不足惜,却给世界环境...
    茶点故事阅读 37,550评论 3 298
  • 文/蒙蒙 一、第九天 我趴在偏房一处隐蔽的房顶上张望。 院中可真热闹,春花似锦、人声如沸。这庄子的主人今日做“春日...
    开封第一讲书人阅读 28,880评论 0 17
  • 文/苍兰香墨 我抬头看了看天上的太阳。三九已至,却和暖如春,着一层夹袄步出监牢的瞬间,已是汗流浃背。 一阵脚步声响...
    开封第一讲书人阅读 30,152评论 1 250
  • 我被黑心中介骗来泰国打工, 没想到刚下飞机就差点儿被人妖公主榨干…… 1. 我叫王不留,地道东北人。 一个月前我还...
    沈念sama阅读 41,451评论 2 341
  • 正文 我出身青楼,却偏偏与公主长得像,于是被迫代替她去往敌国和亲。 传闻我的和亲对象是个残疾皇子,可洞房花烛夜当晚...
    茶点故事阅读 40,637评论 2 335

推荐阅读更多精彩内容

  • Spring Cloud为开发人员提供了快速构建分布式系统中一些常见模式的工具(例如配置管理,服务发现,断路器,智...
    卡卡罗2017阅读 134,490评论 18 139
  • 原文:https://github.com/electron/electron/blob/master/docs/...
    Shmily落墨阅读 18,974评论 1 5
  • 对话框 对话框是提示用户作出决定或输入额外信息的小窗口。 对话框不会填充屏幕,通常用于需要用户采取行动才能继续执行...
    牧童遥指2000阅读 3,799评论 6 11
  • ¥开启¥ 【iAPP实现进入界面执行逐一显】 〖2017-08-25 15:22:14〗 《//首先开一个线程,因...
    小菜c阅读 6,327评论 0 17
  • 终于想要窥探我大学以来一直放荡不羁的心。 可怕的大学。要对自己进行最真诚的剖析了。前方高能。核能,一个小渣男的内心...
    S的随便用账号阅读 384评论 0 51