vb删除文件夹:vb建立删除文件夹

’首先要[工程]-[引用]MicrosoftScripttingRuntime
PrivateSubCommand1_Click()
DimfsoAsNewFileSystemObject
Iffso.FolderExists(\"c:abc\")Then
MsgBox(\"文件夹已存在\")
Else
fso.CreateFolder(\"c:abc\")
EndIf
EndSub

PrivateSubCommand2_Click()
DimfsoAsNewFileSystemObject
IfNotfso.FolderExists(\"c:abc\")Then
MsgBox(\"文件夹不存在\")
Else
fso.DeleteFolder(\"c:abc\")
EndIf
EndSub
Tags:  建立无法删除文件夹 vb建立文件夹 vb.net删除文件夹 vb删除文件夹

延伸阅读

最新评论

发表评论