vb kill的问题

加上错误处理,改为：
{{
On Error Resume Next '发生错误时继续执行下条指令
Kill "D:\1.exe"
}}

==========
或者如果要进行错误处理则可这样:
{{

On Error GoTo err1 '当发生错误时跳到err1代码
'处
Kill "d:\1.exe"
Exit Sub '无错误发生则跳出(或Exit
'Function跳出)
'理代码

err1: '错误处理代码
MsgBox "发生错误,错误号:" & Err.Number

}}

先“遍历exe文件进程,然后终止进程，最后kill删除”，否则是删除不了的。

最好尝试用错误捕捉的语句
然后SHELL("taskkill /f /im d:\1.exe")
然后kill