VBA编程中MsgBox函数怎么用

VBA编程中MsgBox函数怎么用

MsgBox函数一般有两种用法：一是纯粹作消息框使用，比如显示消息“运行结敌初感宽庆青吧束！”，代码：msgbox "运行结束！"。二是在对作应阿载内呀话框中显示消息，来自等待用户单击按钮，并返回一个 Integer 告诉用户单击了哪一个按钮。比如：If MsgBox("单击“是”则删除该文件，“否”放弃", vbYesNo) = vbYes Then'删除文件的代码 End If执行这个msgbox函数将在对话框中出现“是”“否”两个按钮，让用户选择下一步要进行的操作。下面我就以实例来说明Excel的VBA编程中Ms析约仍次转盟善gBox函数的使用方法供需要的朋友们参考：

方法

第一题步：首先让我们打开一个工作样表作为例子（如下图）：

第二步：按下alt+f11进入vba编辑模式，并插入一个计破测端若迫婷新模块命名为msg。并在模块内定义 a=msgbox()，按下 F5运行后，会弹出一个空甲矛矿主角白的对话框（如下图）：

第三步：msgbox的参数与inputbox的参河否第文族普宪图秋数类似，这里需要提出来的是： Value=MsgBox(prompt[，buttons][，title][ ，helpf席示良还植船江粮ile，context]) ，这里面buttons参数为数组组合，并且有规团所改已优早画定的常量或数值，大家需要熟记一下。当然也可以借助vba的自动提示功能来右掌干植哥条收儿辅助记忆。（如下图）：

妒叫胜给半第四步：为了防止excel工作表被误关闭，我们需要这样做。首先在左侧工程编辑栏中选择通用表格。（如下毛图）：

第五步：双击thisworkboo课北明宗让娘目走转k后在右侧对象选项和动作选项中分别选择workbook和before德close来创建一个模块（己适缩村报如下图）：

第五步：输入以下代码：“Dim intreturn As Integer intReturn = MsgBox("退出程序吗?"，vbYesNo + vbQuestion， "提示")If intRetur作处干圆船n <> vbYes The显承洋个战降n Cancel = True”这里解释一下定义return变量顶湖来迫为一个整数值，当变量RETURN不为yes时，则所有操作取值取消（如下图）：