以下方法是删除E盘下的abc文件夹,无论里面有什么都是强行删除Private Sub Command1_Click()Dim fsSet fs = CreateObject("Scripting.FileSystemObject")fs.DeleteFolder "E:\abc\*"fs.DeleteFile "E:\abc\*.*"End Sub
有文件被使用,这个文件夹是不能删除的,你必须先关闭这个文件