vb.net中删除文件夹,vb中删除文件的命令

VB怎么删除文件夹？

引用FSO（Microsoft Scripting Runtime），然后写出

创新互联公司是专业的龙川网站建设公司，龙川接单;提供成都网站建设、成都网站设计,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行龙川网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

Dim FSO As New FileSystemObject

FSO.DeleteFolder ThePath 'ThePath即文件夹路径，而且不必先清空文件夹

或：（不必引用FSO）

Dim FSO As Object

Set FSO = CreateObject("Scripting.FileSystemObject")

FSO.DeleteFolder ThePath 'ThePath即文件夹路径，而且不必先清空文件夹

试一试

vb.net 创建文件夹和删除文件夹

vb.net使用控件folderbrowserdialog1,在程序中:

'设置对话框中在树视图控件上显示的说明文本

me.folderbrowserdialog1.description

=

"请选择输出报表所在路径:"

'设置从其开始浏览的根文件夹

me.folderbrowserdialog1.selectedpath

=

"c:\"

if

me.folderbrowserdialog1.showdialog()

=

dialogresult.ok

then

'取得全路径（包含文件名）

reportpath1

=

system.io.path.getfullpath(me.folderbrowserdialog1.selectedpath)

'设定text显示文件名

txtreport1.text

=

reportpath1

setreportlist()

end

if

在setreportlist()中针对你所需要的文件进行操作等

VB删除文件夹

用rmdir来删除,但使用 RmDir 来删除一个含有文件的目录或文件夹，则会发生错误。所以在试图删除目录或文件夹之前，先使用 Kill 语句来删除所有文件.

Kill "*.*" 删除当前目录下所有文件

' 假设 MYDIR 为一空的目录或文件夹。

RmDir "MYDIR" ' 将 MYDIR 删除。

用VB.NET 删除文件夹 连带这子目录一起删除怎么处理

看看这个，有删除的

Public strPath As String '要导出的文件夹路径

Public NewFile As String '文件保存用

'创建文件夹

Public Sub CreatemyFolder(str As String)

Dim Mybook As Workbook

Dim f

Dim mypath As String

'Dim NewFile As String

Dim strPathFolder$

Dim abc As Object

NewFile = str

'强制覆盖保存时，不让确认框弹出？

Application.DisplayAlerts = False

Set Mybook = ThisWorkbook '把当前工作簿定义为变量Mybook

mypath = ThisWorkbook.Path "\"

strPathFolder = mypath NewFile

strPath = strPathFolder "\"

On Error Resume Next

Set abc = CreateObject("Scripting.FileSystemObject")

If abc.FolderExists(strPathFolder) = True Then

'===删除文件夹==========

Set f = abc.GetFolder(strPathFolder)

f.Delete

abc.CreateFolder (strPathFolder)

'===删除文件夹==========

Exit Sub

Else

abc.CreateFolder (strPathFolder)

End If

Set abc = Nothing

End Sub

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 文件名 '强制删除一个文件