如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
目录TOC\o"1-3"\h\z\uHYPERLINK\l"_Toc339697451"第6章使用对话框2技巧1使用Msgbox函数2技巧2自动关闭的消息框9技巧3使用InputBox函数11技巧4使用InputBox方法15技巧5内置对话框18技巧6调用操作系统“关于”对话框25使用对话框使用Msgbox函数显示简单的提示信息在使用Excel的过程中,如果需要向用户显示简单的提示信息,可以使用MsgBox函数显示一个消息框,如下面的代码所示。#001Submymsgbox()#002MsgBox"欢迎光临ExcelHome!"#003EndSub代码解析:Mymsgbox过程使用MsgBox函数显示一个消息框。MsgBox函数用于显示提示信息,语法如下:MsgBox(prompt[,buttons][,title][,helpfile,context])参数prompt是必需的,代表在消息框中作为信息显示的字符或字符串,最多只能接受约1024个字符,取决于所使用字符的宽度。参数buttons是可选的,用于指定消息框中显示按钮的数目及类型、使用的图标样式、缺省按钮以及消息框的强制回应等。如果省略,则buttons参数的缺省值为0,消息框只显示“确定”按钮。参数title是可选的,代表在消息框标题栏中作为标题的字符或字符串。如果省略,则在标题栏中显示“MicrosoftExcel”。参数helpfile和参数context是可选的,用来为消息框提供上下文相关帮助的帮助文件和帮助主题。如果提供了其中一个参数,则必须提供另一个参数,两者缺一不可。运行Mymsgbox过程,显示如REF_Ref195540208\h图Error!Notextofspecifiedstyleindocument.1所示的消息框。图STYLEREF3\sError!Notextofspecifiedstyleindocument.SEQ图\*ARABIC\s31简单的信息提示定制个性化的消息框如果希望MsgBox函数显示的消息框具有特定的按钮、图标和标题栏,那么可以使用MsgBox函数的buttons参数和title参数,如下面的代码所示。#001SubSpecialmsbox()#002MsgBoxPrompt:="欢迎光临ExcelHome!",_#003Buttons:=vbOKCancel+vbInformation,_#004Title:="ExcelHome"#005EndSub代码解析:Specialmsbox过程使用MsgBox函数显示一个具有特定的按钮、图标和标题栏的消息框。第3行代码设置消息框的Buttons参数,使消息框显示时具有“确定”、“取消”按钮和信息消息图标。MsgBox函数的buttons参数设置值如REF_Ref195540232\h表格Error!Notextofspecifiedstyleindocument.1所示。参数组常数值描述第一组设置消息框按钮数目和类型vbOKOnly0只显示“确定”按钮(默认设置)VbOKCancel1显示“确定”和“取消”按钮VbAbortRetryIgnore2显示“放弃”、“重试”、和“忽略”按钮VbYesNoCancel3显示“是”、“否”和“取消”按钮VbYesNo4显示“是”和“否”按钮VbRetryCancel5显示“重试”和“取消”按钮第二组设置图标的风格VbCritical16显示危险消息图标VbQuestion32显示警告询问图标VbExclamation48显示警告消息图标VbInformation64显示信息消息图标第三组设置默认按钮vbDefaultButton10第一个按钮为默认按钮vbDefaultButton2256第二个按钮为默认按钮vbDefaultButton3512第三个按钮为默认按钮vbDefaultButton4768第四个按钮为默认按钮第四组设置消息框特征vbApplicationModal0应用程序模式:用户必须对消息框作出响应才能继续使用当前的应用程序vbSystemModal4096系统模式:应用程序都被挂起直至用户对消息框作出响应第五组附加选项vbMsgBoxHelpButton16384在消息框上添加“帮助”按钮VbMsgBoxSetForeground65536将消息框设置为前景窗口vbMsgBoxRight524288显示右对齐的消息框vbMsgBoxRtlReading1048576指定在希伯来和阿拉伯语系统中显示的文本应当从右到左阅读表格STYLEREF3\sError!Notextofspecifiedstyle