多语言展示
当前在线:589今日阅读:183今日分享:45

msgbox的用法

msgbox主要用来弹出提示窗口,也可以进行简单的逻辑判断,使用起来简单方便,今天,来看一下msgbox的用法。
工具/原料

电脑一台

方法/步骤
1

建新excel表,alt+f11进入vba编辑窗口。

2

上图是一个很简单的功能,弹出信息“这是一个弹出窗口”,系统的提示说明了msgbox的语法。下图是运行的结果

4

第一个参数是弹出窗口返回的消息,如上面返回的“这是一个弹出窗口”。第二个参数用处就大了,它用来返回弹出窗口的图标样式、有哪些按钮、返回用户选择的信息等。下图是百科里的信息:

5

举一个例子,假如我们要弹出这样的窗口:带有警告图标、是和否按钮,消息为“删除信息无法恢复,是否删除?”。看一下代码:Sub test()    response = MsgBox('删除信息无法恢复,是否删除?', vbExclamation + vbYesNo)End Sub运行结果:

6

以上代码的不同之处在于,msgbox有了返回值,返回值如下表:

7

我们来看一下完整的例子:要求弹出一个信息窗口,信息内容是“删除信息无法恢复,是否删除?”,窗口标题是“警告”,图标是警告图标。如果用户选择了“是”,则返回“删除了!”,否则返回“你取消了!”看一下代码:Sub test()    response = MsgBox('删除信息无法恢复,是否删除?', vbExclamation + vbYesNo, '警告')    If response = vbYes Then        MsgBox '删除了'    Else        MsgBox '你取消了'    End IfEnd Sub 以下是运行结果:

推荐信息