vbs代码中：怎样设置无法关闭？（就是那种无法点关闭窗口关闭，只能通过任务管理器才能的那种...）
展开全部
1.
do
msgbox "打不死的小强"
loop
2.运行其他vbs文件时，同时运行这个让任务管理器打开了就关掉
on error resume next
do
close "taskmgr.exe"
wscript.sleep 500
loop
sub Close(ProcessName)
On Error Resume Next
for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ '循环进程
if Ucase(ps.name)=Ucase(ProcessName) then
ps.terminate
end if
next
end sub
do
msgbox "打不死的小强"
loop
2.运行其他vbs文件时，同时运行这个让任务管理器打开了就关掉
on error resume next
do
close "taskmgr.exe"
wscript.sleep 500
loop
sub Close(ProcessName)
On Error Resume Next
for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ '循环进程
if Ucase(ps.name)=Ucase(ProcessName) then
ps.terminate
end if
next
end sub
追问
额…… 我有个更简单的……
for i=1 to 1111
msgbox ("XX")
next
就是不知道，哪个是无法关闭……求解释……
追答
我说的关不掉的窗口你是这个，是一个死循环
do
msgbox "打不死的小强"
loop
你的那个是循环 1111 次，不行你按住enter键不松开，过一会就没了
我后面那一段是让让任务管理器打开了就关掉
无法从任务管理器结束wscript.exe
也就是vbs或其它进程
这也是死循环，不关机或程序结束是不会结束的
已赞过
已踩过<
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
