Question

VB怎么删除某文件夹里的所有文件夹

是某文件夹下的子目录。

Answer 1

Private Sub Command1_Click()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject") '

fso.DeleteFolder "F:\ABCDE", True
fso.creatfolder "F:\ABCD"
End Sub
这样才能达到楼主所说的删除某一文件夹下的所有文件夹 而用shell语句的话 不应该用del 而是 rd或者rmdir命令 后面也加/S删除目录后记得再用 md 建立该文件夹

Answer 2

直接使用SHELL调用DEL /S (/F)和 RD /S命令