使用MsgBox函数

使用MsgBox函数你目前使用的MsgBox函数局限于给用户用一个简单的,一个按钮的对话框显示信息。你点击确定按钮或者回车来关闭该信息框。要创建一个简单的信息框,只要在MsgBox函数名称后面带上一个用引号包括起来的文本就可以了。换句话说,要显示信息“过程已完成”,你应该准备下列语句:MsgBox"过程已完成"‘(注意,英文状态的引号)你可以将它输入立即窗口,快速地测试上面的指令,当你输入完这条指令并且回车后,VB就显示如,图4-5的信息框。图4-5将文本作为MsgBox函数的参数,来给用户显示信息MsgBox函数允许你使用其它参数,使你可能决定可用的按钮数目,或者将默认的信息框的标题(MicrosoftExcel)改为你自己的标题。也可以设置你自己的帮助主题。MsgBox的语法如下:MsgBox(prompt[,buttons][,title],[,helpfile,context]),注意,MsgBox函数有五个参数,只有第一个,Prompt(提示),是必须的;这些列在方括号里面的参数都是可选的。当你在提示参数输入一个非常长的文本时,VB决定如何断句,使文本适合信息框大小。我们在立即窗口里来做些练习,看不同的文本格式技巧:1.在立即窗口输入以下指令,确保在一行里输入整个文本,回车MsgBox"Alldone.Nowopen""Chap04.xls""andplaceanemptydiskinthediskettedrive.Thefollowingprocedurewillcopythisfiletothedisk."一旦回车,VB显示信息框,如图4-6图4-6如果你设置一下文本格式,长信息看上去将会更吸引人如果你遇到编译错误,可以点击确定,然后确定文件名用双引号括起来——““Chap04.xls””。当你的信息文本特别长时,你可以使用VBA函数Chr将它分割为好几行。Chr函数需要你跟参数,这个参数是0到255之间的数字,它返回这个数字代表的字符。例如Chr(13)返回的是回车(这和按下回车键相同),以及Chr(10)返回换行字符(这在文本行之间添加空行很有用)。2.将上面的指令修改为下述方式:MsgBox"Alldone."Chr(13)"Nowopen""Chap04.xls""andplace"Chr(13)"anemptydiskinthediskettedrive."Chr(13)"Thefollowingprocedurewillcopythisfiletothedisk."图4-7通过使用Chr(13)可以将长文本分割成几行你必须将每段文本片断用引号括起来,内嵌在括号里面的文本(显示状态)需要再用一对括号来括起来,例如““Chap04.xls””。Chr(13)函数指明你希望开始新的一行的地方。字符串的连接字符()用来返回连接字符串的字符。在一行输入及其长的文本的时候,很容易失误。回想一下,VB有一个专门的线连续字符(下划线_)帮你将长VBA语句分割为几行,不幸的是,这个线连续符不能在立即窗口使用。3.在工程MyFunctions(Chap04.xls)里添加一个新模块并命名为Sample64.激活模块Sample6并且输入如下所示的子程序MyMessage,确保在每个线连续符前面加个空格:SubMyMessage()MsgBox"Alldone."Chr(13)_91"Nowopen""Chap04.xls""andplace"Chr(13)_"anemptydiskinthediskettedrive."Chr(13)_"Thefollowingprocedurewillcopythisfiletothedisk."EndSub你运行过程MyMessage时,VB显示如图4-7一样的信息。正如你看到的,在几行输入的文本更具可读性,而且代码更容易维护。你可以在文本行之间添加一下空白行,来增加信息的可读性。使用Chr(13)或twoChr(10)函数就可以做到,如下列步骤所述。5.输入下面的MyMessage2过程:SubMyMessage2()MsgBox"Alldone."Chr(10)Chr(10)_"Nowopen""Chap04.xls""andplace"Chr(13)_"anemptydiskinthediskettedrive."Chr(13)Chr(13)_"Thefollowingprocedurewillcopythisfiletothedisk."EndSub图4-8显示了MyMessage2过程产生的信息框。图4-8你可以通过在文本行之间添加空行增加信息的可读性既然你已经掌握了文本的格式技术,那么我们就来仔细地看看MsgBox函数的下一个参数吧。尽管按钮参数时可选的,但是它的使用还是很频繁的。这个按钮参数明确多少个按钮,并且是什么样的按钮你想要出现了信息框上,这个参数可以是个常量(参见表4-1),也可以是个数字。如果你忽略这个参数,结果辛苦只会有一个“确定”按钮,正如你在前面的例子里看到的那样。表4-1MsgBox按钮参数的设置常量按钮设置vbOKOnlyvbOKCancelvbAbortRetr...

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供参考,付费前请自行鉴别。
3、如文档内容存在侵犯商业秘密、侵犯著作权等,请点击“举报”。

常见问题具体如下:

1、问:已经付过费的文档可以多次下载吗?

      答:可以。登陆您已经付过费的账号,付过费的文档可以免费进行多次下载。

2、问:已经付过费的文档不知下载到什么地方去了?

     答:电脑端-浏览器下载列表里可以找到;手机端-文件管理或下载里可以找到。

            如以上两种方式都没有找到,请提供您的交易单号或截图及接收文档的邮箱等有效信息,发送到客服邮箱,客服经核实后,会将您已经付过费的文档即时发到您邮箱。

注:微信交易号是以“420000”开头的28位数字;

       支付宝交易号是以“2024XXXX”交易日期开头的28位数字。

客服邮箱:

biganzikefu@outlook.com

所有的文档都被视为“模板”,用于写作参考,下载前须认真查看,确认无误后再购买;

文档大部份都是可以预览的,笔杆子文库无法对文档的真实性、完整性、准确性以及专业性等问题提供审核和保证,请慎重购买;

文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为依据;

如果您还有什么不清楚的或需要我们协助,可以联系客服邮箱:

biganzikefu@outlook.com

常见问题具体如下:

1、问:已经付过费的文档可以多次下载吗?

      答:可以。登陆您已经付过费的账号,付过费的文档可以免费进行多次下载。

2、问:已经付过费的文档不知下载到什么地方去了?

     答:电脑端-浏览器下载列表里可以找到;手机端-文件管理或下载里可以找到。

            如以上两种方式都没有找到,请提供您的交易单号或截图及接收文档的邮箱等有效信息,发送到客服邮箱,客服经核实后,会将您已经付过费的文档即时发到您邮箱。

注:微信交易号是以“420000”开头的28位数字;

       支付宝交易号是以“2024XXXX”交易日期开头的28位数字。

文秘专家
机构认证
内容提供者

1

确认删除?