VBScript允许开发人员有效地与用户交互.它可以是一个消息框,用于向用户或输入框显示消息,用户可以使用该输入框输入值.
MsgBox函数显示一个消息框,等待用户单击按钮,然后根据用户单击的按钮执行操作.
MsgBox(prompt[,buttons][,title][,helpfile,context])
提示 : 必需参数.在对话框中显示为消息的字符串.提示的最大长度约为1024个字符.如果消息扩展到多行,那么我们可以在每一行之间使用回车字符(Chr(13))或换行符(Chr(10))来分隔行.
按钮 : 一个可选参数.一个数字表达式,指定要显示的按钮类型,要使用的图标样式,默认按钮的标识以及消息框的模态.如果留空,则按钮的默认值为0.
标题 : 一个可选参数.字符串表达式显示在对话框的标题栏中.如果标题留空,则应用程序名称将放在标题栏中.
helpfile : 一个可选参数.一个String表达式,用于标识用于为对话框提供上下文相关帮助的帮助文件.
context : 一个可选参数.一个数字表达式,用于标识"帮助"作者分配给相应"帮助"主题的"帮助"上下文编号.如果提供了上下文,则还必须提供帮助文件.
按钮参数可以采用以下任何一种方式值 :
0 vbOKOnly仅显示OK按钮.
1 vbOKCancel显示OK和Cancel按钮.
2 vbAbortRetryIgnore显示Abort,Retry和Ignore按钮.
3 vbYesNoCancel显示"是","否"和"取消"按钮.
4 vbYesNo显示"是"和"否"按钮.
5 vbRetryCancel显示重试和取消按钮.
16 vbCritical显示重要消息图标.
32 vbQuestion显示警告查询图标.
48 vbExclamation显示警告信息图标.
64 vbInformation显示信息消息图标.
0 vbDefaultButton1第一个按钮是默认按钮.
256 vbDefaultButton2第二个按钮是默认的.
512 vbDefaultButton3第三个按钮是默认值.
768 vbDefaultButton4第四个按钮是默认按钮.
0 vbApplicationModal应用模式.在用户响应消息框之前,当前应用程序将无法工作.
4096 vbSystemModal系统模式.在用户回复消息框之前,所有应用程序都无法运行.
上述值在逻辑上分为四组:第一组(0到5)表示要在消息框中显示的按钮.第二组(16,32,48,64)描述要显示的图标的风格,第三组(0,256,512,768)指示哪个按钮必须是默认按钮,第四组(0,4096)确定消息框的模态.
MsgBox函数可以返回以下值之一 :
1 - vbOK - 单击确定
2 - vbCancel - 点击取消
3 - vbAbort - 点击中止
4 - vbRetry - 点击重试
5 - vbIgnore - 点击忽略
6 - vbYes - 是的被点击了
7 - vbNo - 没有点击
<!DOCTYPE html> <html> <body> <script language = "vbscript" type = "text/vbscript"> 'Message Box with just prompt message MsgBox("Welcome") 'Message Box with title, yes no and cancel Butttons a = MsgBox("Do you like blue color?",3,"Choose options") ' Assume that you press No Button document.write("The Value of a is " & a) </script> </body> </html>
执行上述脚本时,会显示消息框,如果按否按钮,则a的值为7.
The Value of a is 7
InputBox函数可帮助用户从用户获取值.输入值后,如果用户单击确定按钮或按键盘上的ENTER,则InputBox函数将返回文本框中的文本.如果用户单击"取消"按钮,该函数将返回一个空字符串("").
InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])
提示 : 必需参数.在对话框中显示为消息的字符串.提示的最大长度约为1024个字符.如果消息扩展到多行,那么我们可以在每一行之间使用回车字符(Chr(13))或换行符(Chr(10))来分隔行.
标题 : 一个可选参数.字符串表达式显示在对话框的标题栏中.如果标题留空,则应用程序名称将放在标题栏中.
默认 : 一个可选参数.用户希望显示的文本框中的默认文本.
XPos : 一个可选参数. X轴的位置,表示从屏幕左侧水平的提示距离.如果留空,则输入框水平居中.
YPos : 一个可选参数. Y轴的位置,表示从屏幕左侧垂直的提示距离.如果留空,则输入框将垂直居中.
helpfile : 一个可选参数.一个String表达式,用于标识用于为对话框提供上下文相关帮助的帮助文件.
context : 一个可选参数.一个数字表达式,用于标识"帮助"作者分配给相应"帮助"主题的"帮助"上下文编号.如果提供了上下文,还必须提供helpfile.
<!DOCTYPE html> <html> <body> <script language = "vbscript" type = "text/vbscript"> ' Input Box with only Prompt InputBox("Enter a number") ' Input Box with a Title a = InputBox("Enter a Number","Enter Value") msgbox a ' Input Box with a Prompt,Title and Default value a = InputBox("Enter a Number","Enter Value",123) msgbox a ' Input Box with a Prompt,Title,Default and XPos a = InputBox("Enter your name","Enter Value",123,700) msgbox a ' Input Box with a Prompt,Title and Default and YPos a = InputBox("Enter your name","Enter Value",123,,500) msgbox a </script> </body> </html>
执行上述脚本时,将显示输入框并显示用户输入的值.