VB.NET中怎么操作文件夾

這篇文章將為大家詳細講解有關VB.NET中怎么操作文件夾，文章內容質量較高，因此小編分享給大家做個參考，希望大家閱讀完這篇文章后對相關知識有一定的了解。

VB.NET文件夾操作之文件夾復制

Function CopyDir()Function CopyDir
(ByVal sourcePath As String, ByVal 
targetPath As String) As Boolean  
Try  
'檢查目標目錄是否以目錄分割字符結束,
不是則添加  
If Right(targetPath, 1) <> ""
 Then targetPath += ""  
'判斷目標目錄是否存在,不存在則新建  
If Not Directory.Exists(targetPath)
 Then Directory.CreateDirectory
(targetPath)  
' 得到源目錄的文件列表，該里面是包含
文件以及目錄路徑的一個數組  
Dim fileList As String() = 
Directory.GetFileSystemEntries
(sourcePath)  
'遍歷所有的文件和目錄  
For Each filepath As String In 
fileList  
'目錄處理,遞歸  
If (Directory.Exists(filepath)) Then  
CopyDir(filepath, targetPath + 
Path.GetFileName(filepath))  
Else 

VB.NET文件夾操作之復制文件

File.Copy(filepath, 
targetPath 
+ Path.GetFileName
(filepath), True)  
End If  
Next  
Return True  
Catch ex As Exception  
Return False  
End Try  
End Function 

VB.NET文件夾操作之文件夾刪除

Function DelDir()Function DelDir
(ByVal targetPath As String) 
As Boolean  
Try  
'檢查目標目錄是否以目錄分割字符結束,
不是則添加  
If Right(targetPath, 1) <> "
" Then targetPath += ""  
'得到源目錄的文件列表，該里面是包
含文件以及目錄路徑的一個數組  
Dim fileList As String() = 
Directory.GetFileSystemEntries
(targetPath)  
'遍歷所有的文件和目錄  
For Each filepath As String 
In fileList  
'目錄處理,遞歸  
If (Directory.Exists(filepath)) Then  
DelDir(targetPath + Path.GetFile
Name(filepath))  
Else  
'刪除文件  
File.Delete(targetPath + Path.
GetFileName(filepath))  
End If  
Next  
'刪除文件夾  
System.IO.Directory.Delete
(targetPath, True)  
Return True  
Catch ex As Exception  
Return False  
End Try  
End Function 

關于VB.NET中怎么操作文件夾就分享到這里了，希望以上內容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。