vb中的msgbox是一个函数。
MsgBox函数和MsgBox语句均可用来弹出对话框,不同处在于MsgBox函数可以返回一个值,而MsgBox语句不会返回值。
MsgBox语句:用于弹出一个对话框。
MsgBox内容[,类型][,标题][,帮助文件名,帮助主题目录号]
“内容”参数,为必要参数,是一个字符串,其长度不得超过1024字符。如果超过,多余的部分会被省略。字符串的内容在由MsgBox语句弹出的对话框中显示。当字符串在一行内显示不完时,将自动换行。也可用“chr$(13)+chr$(10)”或“vbCrlf”进行强制换行。
示例:
MsgBox "欢迎XX"
MsgBox类型参数的取值:
MsgBox函数,除可返回值外,其他功能与MsgBox语句相同。
MsgBox函数返回值是一个整数,可以是1~7之间的任意整数,它们分别对应7个按钮被选中的状态。
示例:
Dim a As Integer ‘定义整形变量a
a = MsgBox("你确定要退出吗?", 1 + 32) ‘用变量a来接收MsgBox函数的返回值
If a = 1 Then ‘如果变量a的值为1,即MsgBox函数的返回值为1。那么
End '结束
Else
Print ("你没有退出。") '按取消,不结束
End If
2013-07-26
2013-07-26