1、MsgBox函数
信息框函数(MsgBox)是常用的输出信息的函数。它在对话框中显示信息,等待用户单击按钮,并返回一个整数以标明用户单击了哪一个按钮。其语法格式如下:
变量=MsgBox (信息内容) [,<对话框类型> [,<对话框标题> ]] )
说明: <信息内容>指定在对话框中出现的文本,在信息内容中使用硬回车符(CHR13)可以使文本换行。对话框的宽度和高度随着的内容的增加而增加,最多可以有1024个字符。
<对话框类型>指定对话框中出现的按钮和图标,一般有三个参数。其取值和含义如表3-3-1、表3-3-2和表3-3-3所示。 表3-3-1 参数1:出现按钮
值 | 常 量 | 说 明 |
0 | vbOKOnly | 确定按钮 |
1 | vbOKCancel | 确定和取消按钮 |
2 | vbAbortRetryIgnore | 终止、重试和忽略按钮 |
3 | vbYesNoCancel | 是、否和取消按钮 |
4 | vbYesNo | 是和否按钮 |
5 | vbretryCancel | 重试和取消按钮 |
表3-3-2 参数2:图标类型
值 | 常 量 | 说 明 |
16 | vbCritical | 停止图标 |
32 | vbQuestion | 问号(?)图标 |
48 | vbExclamation | 感叹号(!)图标 |
64 | vbInformation | 信息图标 |
表3-3-3 参数3:默认按钮
值 | 常 量 | 说 明 |
0 | vbDefaultButton1 | 指定默认按钮为第一按钮 |
256 | vbDefaultButton2 | 指定默认按钮为第二按钮 |
512 | vbDefaultButton3 | 指定默认按钮为第三按钮 |
说明:以上三种参数值可以相加以达到所需要的样式。
2、Msgbox的返回值
Msgbox()返回的值指明在对话框中选择了哪一个按钮,如表3-3-4
表3-3-4
返 回 值 | 常 量 | 按 钮 |
1 | vbOK | 确定按钮 |
2 | vbCancel | 取消按钮 |
3 | vbAbort | 终止按钮 |
4 | vbRetry | 重试按钮 |
5 | vbIgnore | 忽略按钮 |
6 | vbYes | 是 |
7 | vbNo | 否 |
3、简单实例
<html>
<head>
<title>Msgbox()函数的应用</title>
</head>
<body>
<script for="button1" event="onClick" language="VBScript">
a=Msgbox("明天去春游吗?",vbYesNo,"校长问大家")
if a =6 then
Msgbox "我很乐意与大家一起去春游。",Yes,"OK"
else
Msgbox "我明天工作忙,不能去,祝大家玩的开心。",Yes,"NO"
end if
</script>
<input type="button" name="button1" value="单击看校长提出什么问题">
</html>
4、输入框函数
输入框函数(InputBox)显示一个能接受用户输入的对话框,并返回用户在对话框中输入的信息。其语法格式为:
变量=InputBox ( <信息内容> [, <对话框标题> ][, <默认内容> ] )
注解:
<信息内容>指定在对话框中出现的文本。在<信息内容>中使用硬回车符(CHR(13))可以使文本换行。对话框的高度和宽度随着<信息内容>的增加而增加,最多可以有1024个字符。 <对话框标题>指对话框的标题。 <默认内容>可以指定输入框的文本框中显示的默认文本。如果用户单击"确定"按钮,文本框中的文本(字符串)将返回到变量中,若用户"取消"按钮,返回的将是一个零长度的字符串。
如果省略了某些可选项,必须加入相应的逗号分隔符。
简单实例:
<html>
<head>
<title>InputBox()函数的应用</title>
</head>
<body>
<script language="VBScript" for="button" event="onClick">
myInput=Inputbox("请许下您的心愿","许愿","祝我全家平安!")
Msgbox myInput,vbYes,"这是我的心愿"
</script>
<div align="center"><input type="button" name="button" value="这是我的心愿"></div>
</html>
Word教程网 | Excel教程网 | Dreamweaver教程网 | Fireworks教程网 | PPT教程网 | FLASH教程网 | PS教程网 |
HTML教程网 | DIV CSS教程网 | FLASH AS教程网 | ACCESS教程网 | SQL SERVER教程网 | C语言教程网 | JAVASCRIPT教程网 |
ASP教程网 | ASP.NET教程网 | CorelDraw教程网 |