调用DOS命令rmdir 删除一个具有多级目录的目录
Private Sub KillFolder(MyFolderPath As String)
Shell "cmd.exe /c rmdir /s/q " & Chr(34) & MyFolderPath & Chr(34)
End Sub
Private Sub Command1_Click()
KillFolder "C:/Temp"
End Sub
本文介绍了一种使用VBA代码调用DOS命令rmdir来递归删除包含多级子目录的方法。通过一个简单的示例展示了如何编写VBA宏来实现这一功能。
调用DOS命令rmdir 删除一个具有多级目录的目录
Private Sub KillFolder(MyFolderPath As String)
Shell "cmd.exe /c rmdir /s/q " & Chr(34) & MyFolderPath & Chr(34)
End Sub
Private Sub Command1_Click()
KillFolder "C:/Temp"
End Sub
393
441
498

被折叠的 条评论
为什么被折叠?