VBS中如何响应"取消"这个按键

如:If ....Then Eixt Do
if的后面是点击"取消"按键的响应
PS:做了个对话框,取消按键没有用了...用的是DO LOOP

试试这个程序你就知道了。

Dim result
result=MsgBox("123",1,"234")

If result=1 Then
MsgBox "你点了确定"
End If

If result=2 Then
MsgBox "你点了取消"
End If

http://www.microsoft.com/china/vbscript/vbslang/vsconMsgBox.htm
温馨提示:内容为网友见解,仅供参考
第1个回答  2008-11-25
If Answer = vbCancel Then ....

vbCancel !!!!!

VBS中如何响应"取消"这个按键
If result=1 Then MsgBox "你点了确定"End If If result=2 Then MsgBox "你点了取消"End If http:\/\/www.microsoft.com\/china\/vbscript\/vbslang\/vsconMsgBox.htm

VBS中怎么接收inputbox里面的“取消”的值?
if inputbox("请输入,不想输入就点‘取消’!",,"标题") <> "" then msgbox "我想点击‘取消’就退出!"end if

怎么让vbs在确定取消按钮,按确定就关闭窗口,按取消就会无限循环这个窗 ...
DoResponse = MsgBox("是否继续",4,"询问")If Response = 6 Then Exit DoLoop

如何取消vbs的命令
取消vbs的命令操作如下:1、首先通过快捷键Ctrl+Alt+Delete打开任务管理器,也可以将鼠标移动到任务栏上,右键选择启动任务管理器。2、在任务管理器中的应用程序下是没有这个程序的,也就是说vbs是一个进程,要点击到进程查看选项。3、然后在进程中找到wscript.exe这个进程,如果进程列表一直在变动的,可...

VBS中,如何控制InputBox 里面的按钮?
用逻辑运算 "或"只要有一个条件不满足,就退出 wind = inputbox("请输入字符串, 点击 ""取消""则退出","输入","snow")if wind = "" or len(wind) < 15 then wscript.quit wscript.echo "这里是你的执行代码"

vbs点击取消怎样退出程序?
双击打开“结束VBS.txt”,在里面输入:【dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "taskkill \/im wscript.exe \/f ",0 ,true 】,“【】”不要输入,换行格式,然后保存退出。保存后,若未显示“txt”扩展名,修改系统显示扩展名设置,然后修改文件扩展名为"...

vbs怎么操作confirm?
在vbs中,您可以通过调用JavaScript的confirm()函数来操作 confirm 对话框。confirm()方法用于显示一个带有消息和 OK 及取消按钮的对话框。示例代码:'定义一个消息文本 message = "确定要删除此文件吗?"'使用confirm()方法显示一个对话框,并将返回值保存在result中 result = MsgBox(message, vbOKCancel...

...高手 麻烦下 帮我这个定时关机加个可以取消按钮 不然开了停不了...
set wso=wscript.createobject("Wscript.Shell")t=inputbox("输入预定关机时间,以分为单位;如值为空,则为取消自动关机")if t="" then wso.run "shutdown -a"else t=t*60 wso.run "shutdown -s -t " & t end if

VBS怎么制作有多个选项的对话框
如何让VBS弹出一个对话框“确认、取消”,单击确认就执行下一个程序,单击取消就不执行并且关闭对话框? 制作有多个选项的对话框?dim wshset wsh = createobject("wscript.shell")if msgbox( "打开计算器?",1,"询问")=1 then wsh.run "calc.exe"end if msgbox "内容",VbYesNoCancel,"标题"...

vbs退出的问题
加个取消不是更好??if msgbox("这是被封印的东西",65,"警告!!!") = 1 then if msgbox("请不要一意孤行",65,"警告!!!") =1 then if msgbox("不要再按了!!",65,"警告!!!") =1 then if msgbox("气死我了...",65,"警告!!!") =1 then else wscript.quit end ...

相似回答
大家正在搜