以下是帮助文档中关于 MsgGox 函数的说明： 使用示例代码如下： 本示例使用 MsgBox 函数，在具有“是”及“否”按钮的对话框中显示一条严重错误信息。示例中的缺省按钮为“否”，MsgBox 函数的返回值视用户按哪一个钮而定。本示例假设 DEMO.HLP 为一帮
MsgBox函数一般有两种用法：一是纯粹作消息框使用，比如显示消息“运行结束！”，代码：msgbox "运行结束！"。二是在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击了哪一个按钮。比如：If MsgBox("单击“是”则删除该文件，“否”放弃", vbYesNo) = vbYes Then'删除文件的代码 End If执行这个msgbox函数将在对话框中出现“是”“否”两个按钮，让用户选择下一步要进行的操作。下面我就以实例来说明Excel的VBA编程中MsgBox函数的使用方法供需要的朋友们参考：
首先来看一下MsgBox的基本语法格式： MsgBox(prompt[, buttons] [, title] [,helpfile, context]) 下面就其中的各参数进行详细的讲解。 prompt参数（必选参数）：该参数用于表明输出对话框所显示的内容，由于该参数只代表长度为255个字符的一个
方法
第一步：首先让我们打开一个工作样表作为例子（如下图）：
MsgBox(prompt[, buttons] [, title] [, helpfile, context])MsgBox 函数的语法具有以下几个命名参数： Prompt-------必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符，由所用字符的宽度决定。 如果 prom
第二步：按下alt+f11进入vba编辑模式， 并插入一个新模块命名为msg。并在模块内定义 a=msgbox()， 按下 F5运行后， 会弹出一个空白的对话框（如下图）：
如果只作消息框使用，就在函数后面空格后接一个字符串即可，如： msgbox "计算结束！！" 如果要作选择对话框使用，则要使用不同的参数，生成不同的按钮。比如： If MsgBox("此操作要花费很长时间，是否继续？", vbYesNo) = vbYes Then '此处是运
第三步：msgbox的参数与inputbox的参数类似 ，这里需要提出来的是： Value=MsgBox(prompt[，buttons][，title][ ，helpfile，context]) ，这里面buttons参数为数组组合，并且有规定的常量或数值，大家需要熟记一下。当然也可以借助vba的自动提示功能来辅助记忆。（如下图）：
MsgBox(prompt[, buttons] [, title] [, helpfile, context])MsgBox 函数的语法具有以下几个命名参数： Prompt-------必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符，由所用字符的宽度决定。 如果 prom
第四步：为了防止excel工作表被误关闭，我们需要这样做 。首先在左侧工程编辑栏中选择通用表格 。（如下图）：
if msgbox("继续吗？（Y/N）",vbquestion+vbyesno,“提示”)=vbyes then '你的代码1 else '你的代码2 end if
第五步：双击thisworkbook后在右侧对象选项和动作选项中分别选择workbook和beforeclose来创建一个模块（如下图）：
要在VBA中使用工作表中使用的函数的话，要在函数前面加WorksheetFunction 以下是例子，自己看看吧。 for j = 1 to 10 msgbox worksheetfunction.vlookup(,,j,) next
第五步：输入以下代码：“Dim intreturn As Integer intReturn = MsgBox("退出程序吗?"，vbYesNo + vbQuestion， "提示")If intReturn <> vbYes Then Cancel = True”这里解释一下定义return变量为一个整数值，当变量RETURN不为yes时，则所有操作取值取消（如下图）：
按钮执行效果相当于F9吧（计算所有工作表），那么下面的一个语句即可： Calculate
第六步：输入完成好，我们切换回excel工作表，点击右上角x关闭工作表，会弹出提示。至此本次操作正确。以上就是VBA编程中MsgBox函数的使用过程（如下图）：
按钮执行效果相当于F9吧（计算所有工作表），那么下面的一个语句即可： Calculate
扩展阅读，以下内容您可能还感兴趣。
EXCEL VBA 函数Msgbox应用
按钮执行效果相当于F9吧（计算所有工作表），那么下面的一个语句即可：
Calculate
vba编程中msgbox函数在调试的时候能触发,但是回到excel界面就不能触发了
这个是宏表函数，你没有指定运行条件。
写到
即可
Private Sub Workbook_Open()
If Cells(1, 1).Value <> "" Then
Call MsgBox("你好大帅哥，请选择时间。", vbOKOnly)
Range("BC1").Select
End If
End Sub
VBA MSGBOX函数怎么了？
没问题,但可以这么写：
Sub test()
MsgBox "确定？"
Range("A2:B14").Clear
End Sub
2. 如图所示：
追问感谢您的回复。主要的问题是MSGBOX函数提示框的问题。也请教过其它的老师，用的都是OFFICE，运行正常。WPS的兼容问题吗？WPS自带的通用进销存助手也有提示框的出现，不会出现我的问题啊？不知道这是乍的了追答wps没试过，你可以用msgbox（）试试，加括号。VBA编程:计算所选工作表区域中单元格的最小值,用MsgBox函数输出结果
MsgBox Application.WorksheetFunction.Min(Selection)
VBA中使用MSGBOX函数时弹出的对话框中怎样显示小数点前面的零？
arr = Range("a1") - Range("a2")
MsgBox (Format(arr, "0.00"))
