详解MessageBox(),MsgBox函数的正确使用

标签：

//或者使用chr(13),chr(10)效果一样
MsgBox "a"&chr(13)&"b"&chr(10)&"c"
//带有警告标志的窗口
MsgBox "a"&chr(13)&"b"&chr(10)&"c",16
//显示确定取消按钮
MsgBox "a"&chr(13)&"b"&chr(10)&"c",1
//让窗口显示到最前写法
MsgBox "a"&vbcr&"b"&vbcr&"c",4096
//让窗口显示标题
MsgBox "a"&vbcr&"b"&vbcr&"c",4096,"天那边"
//hehe综合一下，让窗口显示换行+警告标志+显示确定取消按钮+默认为取消+最前+标题
MsgBox "a"&vbcr&"b"&vbcr&"c",16+1+256+4096,"天那边"
//写到这里大家一定明白了吧。关键是buttons项的设置值其中的可以是数字也可以是表达式我一般采用表达式，这样可以使自己看到msgbox语句的属性
//这里再来举个msgbox的返回值例子如下：
dim a
a=MsgBox ("a"&vbcr&"b"&vbcr&"c",16+1+256+4096,"天那边")
If a=1
    MsgBox "您点击了确定"
Else
    If a=2
        MsgBox "您点击了取消"
    End If
End If
EndScript

详解MessageBox(),MsgBox函数的正确使用

标签：

原文地址：http://www.cnblogs.com/caianhua/p/4471505.html