如何使用vbscript中的msgbox函数

来源:百度知道 编辑:UC知道 时间:2024/05/27 01:45:02
在html语言中,应该怎样设计一个vbscript的msgbox函数使得在不点“确定”时全部应用程序都被挂起,直到用户对消息框作出响应才继续工作。
请高手指教,并把源程序留下,谢谢!!!
第一个回答并不能使所有已打开的程序都被挂起
我刚试验过
请高手继续回答,谢谢!!

MsgBox是Visual Basic和VBS中的一个函数,功能是弹出一个对话框,等待用户单击按钮,并返回一个Integer值表示用户单击了哪一个按钮。
  “MsgBox”即为“Message Box”的缩写,在英语中意为“信箱”。
  语法:
  MsgBox (Prompt [,Buttons] [,Title] [,Helpfile,Context])
  说明:
  在提供了Helpfile与Context参数的时候,用户可以按F1来查看由Context参数指定的帮助主题。像Microsoft Excel这样的一些主机应用程序就会在对话框中自动添加一个帮助按钮。
  如果对话框显示“取消”按钮,则按下Esc键与单击“取消”按钮的效果相同。如果对话框中有帮助按钮,则对话框中提供与上下文相关的帮助。但是,直到其它按钮中有一个被单击之前,都不会返回任何值。

  代码示例:
  一、使用MsgBox函数,在具有“是”及“否”按钮的对话框中显示一条错误信息。示例中的缺省按钮为“否”,并假设Demo.hlp为一帮助文件,其中有一个帮助主题编号为1000。
  
  Dim Msg, Style, Title, Help, Ctxt, Response, MyString
  Msg = "程序发生错误,继续?" '定义消息文本
  Style = vbYesNo + vbCritical + vbDefaultButton2 '定义对话框样式
  Title = "错误信息" '定义标题文本
  Help = "Demo.hlp" '定义帮助文件
  Ctxt = 1000 '定义帮助主题编号
  Response = MsgBox(Msg, Style, Title, Help, Ctxt)
  If Response = vbYes Then '用户按下“是”按钮
  MyString = "Yes" '进行某些操作
  El