VBScript高级:对话框

什么是对话框?

VBScript允许开发人员与用户进行有效的交互。它可以是一个向用户显示消息的消息框,也可以是一个用户可以用来输入值的输入框。

VBScript MsgBox函数

MsgBox函数将显示一个消息框,并等待用户单击按钮,然后根据用户单击的按钮执行操作。

语法

MsgBox(prompt[,buttons][,title][,helpfile,context])

参数说明

  • 提示-必需参数。在对话框中显示为消息的字符串。提示的最大长度约为1024个字符。如果消息超出一行,则可以在每行之间使用回车符(Chr(13))或换行符(Chr(10))分隔行。
  • 按钮-可选参数。一个数字表达式,用于指定要显示的按钮的类型,要使用的图标样式,默认按钮的标识以及消息框的形式。如果保留为空白,则按钮的默认值为0。
  • 标题-可选参数。对话框标题栏中显示的String表达式。如果标题留为空白,则应用程序名称将放置在标题栏中。
  • helpfile-可选参数。一个字符串表达式,用于标识用于为对话框提供上下文相关帮助的帮助文件。
  • 上下文-可选参数。一个数字表达式,用于标识帮助作者分配给相应帮助主题的帮助上下文编号。如果提供了上下文,则还必须提供帮助文件。

按钮参数可以采取以下任何值-

  • 0 vbOKOnly仅显示确定按钮。
  • 1 vbOKCancel显示确定和取消按钮。
  • 2 vbAbortRetryIgnore显示中止,重试和忽略按钮。
  • 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-vb是-单击是
  • 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>

执行上述脚本后,将显示消息框,如果按No Button,则a的值为7。

The Value of a is 7

VBScript InputBox函数

InputBox函数可帮助用户从用户那里获取值。输入值后,如果用户单击“确定”按钮或按键盘上的ENTER键,InputBox函数将在文本框中返回文本。如果用户单击“取消”按钮,该函数将返回一个空字符串(“”)。

语法

InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])

参数说明

  • 提示-必需参数。在对话框中显示为消息的字符串。提示的最大长度约为1024个字符。如果消息超出一行,则可以在每行之间使用回车符(Chr(13))或换行符(Chr(10))分隔行。
  • 标题-可选参数。对话框标题栏中显示的String表达式。如果标题留为空白,则应用程序名称将放置在标题栏中。
  • 默认值-可选参数。用户希望在文本框中显示的默认文本。
  • XPos-可选参数。X轴的位置,表示从屏幕左侧到水平方向的提示距离。如果留为空白,则输入框为水平居中。
  • YPos-可选参数。Y轴的位置,表示垂直于屏幕左侧的距离。如果保留为空白,则输入框为“垂直居中”。
  • 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>

执行上述脚本后,将显示输入框,并由用户显示输入的值。

作者:terry,如若转载,请注明出处:https://www.web176.com/vbscript/1101.html

(0)
打赏 支付宝 支付宝 微信 微信
terryterry
上一篇 2020年12月4日 下午7:11
下一篇 2020年12月4日 下午7:23

相关推荐

发表回复

登录后才能评论