msgbox主要用来弹出提示窗口,也可以进行简单的逻辑判断,使用起来简单方便,今天,来看一下msgbox的用法。
msgbox的用法――工具/原料电脑一台msgbox的用法――方法/步骤
msgbox的用法 1、
建新excel表,alt+f11进入vba编辑窗口。
msgbox的用法 2、
上图是一个很简单的功能,弹出信息“这是一个弹出窗口”,系统的提示说明了msgbox的语法。
下图是运行的结果
msgbox的用法 3、
下面对msgbox的参数做一个介绍,下图是百度百科里的信息。
msgbox的用法 4、
第一个参数是弹出窗口返回的消息,如上面返回的“这是一个弹出窗口”。
第二个参数用处就大了,它用来返回弹出窗口的图标样式、有哪些按钮、返回用户选择的信息等。下图是百科里的信息:
msgbox的用法_msgbox
msgbox的用法 5、
举一个例子,假如我们要弹出这样的窗口:带有警告图标、是和否按钮,消息为“删除信息无法恢复,是否删除?”。看一下代码:
Sub test() response = MsgBox("删除信息无法恢复,是否删除?", vbExclamation + vbYesNo)End Sub
运行结果:
msgbox的用法 6、
以上代码的不同之处在于,msgbox有了返回值,返回值如下表:
msgbox的用法 7、
我们来看一下完整的例子:要求弹出一个信息窗口,信息内容是“删除信息无法恢复,是否删除?”,窗口标题是“警告”,图标是警告图标。如果用户选择了“是”,则返回“删除了!”,否则返回“你取消了!”
看一下代码:
Sub test() response = MsgBox("删除信息无法恢复,是否删除?", vbExclamation + vbYesNo, "警告") If response = vbYes Then MsgBox "删除了" Else MsgBox "你取消了" End IfEnd Sub
以下是运行结果:
msgbox的用法_msgbox