2009-08-27 49 views
5

Có vẻ như không tìm được cách để làm điều này, google không làm tôi thất vọng!Liệt kê tất cả các thư mục trong thư mục

Xin vui lòng trợ giúp, cảm ơn bạn!

+2

"google không làm tôi!" -Oh thật sao? https://www.google.co.uk/search?sclient=tablet-gws&site=&source=hp&btnG=Search&q=List+a+directory%27s+subdirectories+Visual+Basic –

Trả lời

12

Hãy thử điều này:

Imports System 
Imports System.IO 

Class Program 
    Shared Sub Main() 
     For Each Dir As String In Directory.GetDirectories("c:\Program Files") 
      Console.WriteLine(Dir) 
     Next 
    End Sub 
End Class 

Tôi đang sử dụng phương pháp Directory.GetDirectories mà trả về một mảng các chuỗi, một cho mỗi thư mục con của thư mục tôi cung cấp như một tham số để phương pháp này.

4
DirectoryInfo di = new DirectoryInfo("path"); 

di.GetDirectories(); 
0
di = New DirectoryInfo(path) 

rgFiles = di.GetFiles("*.*", IO.SearchOption.AllDirectories) 

For Each fi As FileInfo In rgFiles 
    If CheckIfExist(fi.FullName.ToString.Replace("\" & fi.Name, "")) = False Then 
     ListBox1.Items.Add(fi.FullName.ToString.Replace("\" & fi.Name, "")) 
    End If 
Next 

Public Function CheckIfExist(ByRef Path As String) As Boolean 
    Dim RetVal As Boolean = False 

    For Each LI As String In ListBox1.Items 
     If LI.ToString = Path Then 
      RetVal = True 
      Return RetVal 
      Exit Function 
     End If 
    Next 
    Return RetVal 
End Function 
+0

Cảm ơn bạn đã đăng câu trả lời! Mặc dù đoạn mã có thể trả lời câu hỏi vẫn tuyệt vời để thêm một số thông tin bổ sung xung quanh, như giải thích, v.v. – j0k

Các vấn đề liên quan