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或其它进程
这也是死循环，不关机或程序结束是不会结束的
温馨提示：内容为网友见解，仅供参考
无其他回答
相似回答
