易表在线答疑技术与交流精华分享 → [函数参考]MsgBox(小吴原创)


  共有10185人关注过本帖树形打印复制链接

主题:[函数参考]MsgBox(小吴原创)

帅哥哟,离线,有人找我吗?
喜爱易表
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:天使 帖子:178 积分:0 威望:0 精华:0 注册:2006/8/11 11:09:00
[函数参考]MsgBox(小吴原创)  发帖心情 Post By:2006/8/16 19:23:00 [只看该作者]

函数用途:

提示函数,可以设定提示信息,可以根据用户的选择返回不同的值。


函数语法:

MsgBox(Message,Option,Icon)
Message 提示信息
Option  决定MsgBox函数的返回值,设为0返回False,设为1返回True,设为2则根据用户的选择返回值,用户选择“是”返回True,选择“否”返回False。
Icon    可选参数,图标类型,1错误,2询问,3警告,4提示


关于Icon参数:

MsgBox函数的3个参数中,ICON参数是容易被忽略的可选用参数,其实,将该参数设置为1~4中的任意整数,就可以更改信息弹窗的图标,具体如下:

默认情况下不用ICON参数时,MsgBox函数默认选用的信息弹窗图标是黄色的惊叹号,就是与ICON参数选为3时的一样。

ICON设为1时:

此主题相关图片如下:
[UploadFile=2003111385703804_1155727278.gif]


ICON设为2时:[UploadFile=2003111385814503_1155727295.gif]


ICON设为3时:
[UploadFile=2003111385977855_1155727311.gif]

ICON设为4时:[UploadFile=2003111392533334_1155727331.gif]

利用换行符或软回车自定义信息弹窗:

MsgBox经常被用在验证公式或者与IF函数结合使用,以实现弹出提示信息窗口的目的。

可是,你是否想过,如果我们的提示信息比较长,会出现怎样的情况呢——MsgBox本身对于信息的字数是没有限制的,当字数过多时信息弹窗会自动换行,请看下面的图片:[UploadFile=2003111392933131_1155727352.gif]

本图中使用的公式为:
MsgBox("MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。",1)

很明显,大家都会觉得这个提示信息看起来就不爽,主要是由于两行提示信息之间靠得太近造成的。

有些用户可能注意到这个问题了,于是尽量减少提示信息的字数,但是有时候实在减不掉了,就会出现上面的尴尬情况了;

此外,有时用户会希望能够自己控制在什么时候自动换行。

实际上,这一切都是可以实现的!

解 决 办 法 一(换行符法):

细心的用户可能发现了,MsgBox函数是直接调用Windows操作系统的信息窗口,没错,默认情况下,其换行是以69个字符为极限(如上图所示)

其实,我们可以利用换行符char(13)来解决这个问题!

如果我们将公式:
MsgBox("MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。",1)

修改为:
MsgBox("MsgBox经常被用在验证公式或者与IF函数结合使用,"+char(13)+"以实现提示的目的。"+char(13)+"MsgBox经常被用在验证公式或者与IF函数结合使用,"+char(13)+"以实现提示的目的。",1)

则弹出的信息窗口如下图所示:
[UploadFile=2003111393342351_1155727375.gif]

本图中使用的公式为:
MsgBox("MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。",1)

很明显,大家都会觉得这个提示信息看起来就不爽,主要是由于两行提示信息之间靠得太近造成的。

有些用户可能注意到这个问题了,于是尽量减少提示信息的字数,但是有时候实在减不掉了,就会出现上面的尴尬情况了;

此外,有时用户会希望能够自己控制在什么时候自动换行。

实际上,这一切都是可以实现的!

解 决 办 法 一(换行符法):

细心的用户可能发现了,MsgBox函数是直接调用Windows操作系统的信息窗口,没错,默认情况下,其换行是以69个字符为极限(如上图所示)

其实,我们可以利用换行符char(13)来解决这个问题!

如果我们将公式:
MsgBox("MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。MsgBox经常被用在验证公式或者与IF函数结合使用,以实现提示的目的。",1)

修改为:
MsgBox("MsgBox经常被用在验证公式或者与IF函数结合使用,"+char(13)+"以实现提示的目的。"+char(13)+"MsgBox经常被用在验证公式或者与IF函数结合使用,"+char(13)+"以实现提示的目的。",1)

则弹出的信息窗口如下图所示:
[UploadFile=2003111393554220_1155727393.gif]

解 决 办 法 二(软回车法):

上面介绍的是用换行符来自定义信息弹窗,其实把换行符char(13)用软回车(Shift+Enter)替代即可实现上面的效果,这里就不多介绍了。


 回到顶部