第七讲信息函数Msgbox.docxVIP

第七讲 信息函数Msgbox本节主要内容： ●Msgbox函数的功能及作用 ●Msgbox函数的语法 ●Msgbox函数的限制今天的课程内容是信息函数Msgbox, 本来打算和Inputbox一起讲的后来发现信息函数Msgbox的内容也比较多,所以今晚只讲信息函数Msgbox.。输入输出语句是VBA中应用最广也是最简单的两种语句，本课时主要介绍两种输出语句的语法和思路，下一课时则介绍两种输入语句的语法和应用思路。本课时内容摘自《Excel VBA程序开发自学宝典(第2版)》第10章。7.1Msgbox函数的功能及作用VBA最常见的信息输出方式是使用Msgbox函数，在任何VBA的书籍中，它所出现的频率都是最高的，在英文中，Msg表示Message，即消息，而Msgbox则表示信息框。顾名思义，Msgbox是用于在屏幕中显示某些信息的对话框，告诉用户需要做什么，或者提示程序的运算结果，或者某操作的步骤说明等，它的作用极其广泛。站在VBA开发者立场，对Msgbox函数的功能可做以下分类：7.1.1返回运算结果告诉用户VBA的运算结果通常有三种模式：存入工作表、打印到文件和利用消息框返回结果。通常对于临时性的、不需要储存的信息可以利用对话框来展示，它的特点是关闭窗口后就完全消失，不占用任何内存空间。7.1.2询问执行方式对于某些有多种执行选项的操作，例如“隔行着色工作表”工具，它可以对奇数行着色，也可以对偶数行着色，为了体现程序的通用性和灵活性时，往往弹出一个提示框让用户选择执行方式，这是最佳的程序开发思路。例如上图中，用户单击不同按钮时，VBA会执行不同的着色方式。7.1.3提示执行步骤在设计VBA程序时，如果后续需执行的操作较复杂，应该通过一个消息框来提示用户。包括该程序大概有多少步骤，各步骤中需要注意哪些问题，或者在什么情况下需要跳过什么步骤等，从而减少程序出错的机率。7.1.4告知错误原因终端用户在执行VBA程序时，总会有或多或少的错误产生。有时是程序员粗心写错代码造成，有时是代码的兼容性造成，有时是代码完全正确但用户的数据不规范造成。而VBA很多时候返回的错误提示让人摸不着头脑，程序员有必要预先设置更有意义的错误提示，告诉用户产生此错误的可能情况。例如，当工作表保护时执行以下语句，一定会产生错误提示：Sub 赋值() Range(a1) = 1End Sub请大家先保护一个工作表，然后在VBE界面中插入一个模块，并在模块中录入以上代码，然后按F5键执行代码你会发现执行结果如下：从图片和代码进行分析，错误提示与代码实际出错的原因风马牛不相及，这完全不利于终端用户了解程序出错的原因。为了避免这种差错，开发程序者需要通过一个信息框来展示更有意义的错误提示。下图是修改后的提示框，用户可以立刻明白错误产生的原因。 Sub 赋值() If ActiveSheet.ProtectContents Then MsgBox 请不要在保护工作表时执行 Else Range(a1) = 1 End IfEnd Sub可以用以上代码修改赋值方式，如果工作表处理保护状态时，将得到以下结果 利用Msgbox函数改造内部的错误提示7.1.5展示当前状态类似于DOS程序中“请按任意键继续……”一样，VBA也可以在程序执行时显示当前的状态，然后当用户单击回车后再继续执行。7.1.6设计程序帮助Excel自身的所有功能都有相应的说明信息，利用VBA开发程序时也需要设计一帮助系统，不管这个系统大小如何，一定要有相应的说明。通常包括三方面的内容：(1)程序功能说明。(2)程序版本及各版本修改内容阐述。(3)本程序适用范围，即兼容哪些Office版本，或者适用哪个行业。当然，利用Msgbox制作帮助界面受字符长度限制，只能提供一些简单且简短的信息。接下来介绍 Msgbox函数的语法7.2Msgbox函数的语法Msgbox用于在对话框中显示消息，等待用户单击按钮，并返回一个Integer类型的值。当用户单击其中的按钮后将返回信息给VBA，程序员可以根据这个返回值来决定后续的操作。7.2.1Msgbox的语法Msgbox的具体语法如下：MsgBox(prompt[, buttons] [, title] [, helpfile, context])括号中的是Msgbox函数的参数。带方括号[]的是可选参数所以，大家可以观查以上语法表，只有第一个参数是必选参数，后面的全是可选参数。这是每个参数的功能说明。 以下代码（放置位置：模块中）是Msgbox函数的最常用的一种形式，它使用了prompt、 buttons、title三个参数，不同参数决定了信息框中的不同位置的部件。Sub 宏() MsgBox 您喜欢VBA吗?, vbYesNo, 提示End Sub大家可以同时观看