VB 强制删除文件和文件夹

看看能够帮到你吧。。。。3个方法可以实现:

1:

kill 文件 '删除文件

rmdir 文件夹 '删除文件夹

如果想要使用 RmDir 来删除一个含有文件的目录或文件夹，则会发生错误。在试图删除目录或文件夹之前，先使用 Kill 语句来删除所有文件。

2:

或者用对象的方法:

Set fs = CreateObject("Scripting.FileSystemObject")

fs.deletefile 删除文件

fs.deletefolder 删除文件夹

3:

用API也可以办到

Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long

deletefile 文件名 '强制删除一个文件

vb删除文件应该是kill ****，，，如：kill "d:\1.txt" 强制删除，先要检查进程是否有这个文件，有的话，结束进程，再kill这个文件。否则直接kill文件。枚举进程的代码，你自己百度下吧。

给你来个简单的。你的效果应该不难。

因为文件进程存在，所以一般的命令是删除不了的。

但是结束进程后是可以的，结合cmd命令来完成

taskkill /im 你要删除的文件进程名 →如 taskkill /im explorer.exe

然后执行删除命令

kill ....

---