手抄报 安全手抄报 手抄报内容 手抄报图片 英语手抄报 清明节手抄报 节约用水手抄报

msgbox的用法

时间:2024-10-12 23:51:47

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

msgbox的用法

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

msgbox的用法

3、下面对msgbox的参数做一个介绍,下图是百度百科里的信息。

msgbox的用法

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

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的用法
msgbox的用法
© 手抄报圈