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 thenMsgbox "我很乐意与大家一起去春游。",Yes,"OK"elseMsgbox "我明天工作忙,不能去,祝大家玩的开心。",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>
零七网部分新闻及文章转载自互联网,供读者交流和学习,若有涉及作者版权等问题请及时与我们联系,以便更正、删除或按规定办理。感谢所有提供资讯的网站,欢迎各类媒体与零七网进行文章共享合作。