Dizindeki Tüm Klasörleri Listele

Question

Bunu yapmanın bir yolunu bulamıyor gibi görünüyor, google bana hata veriyor!

Lütfen yardım edin, teşekkür ederim!

Answer 1

Bu deneyin: şeritlerinin bir dizi, bir yönteme, bir parametre olarak temin dizinin her alt için bir döner Directory.GetDirectories yöntemi kullanıyorum

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 

.

Answer 2

DirectoryInfo di = new DirectoryInfo("path"); 

di.GetDirectories(); 

Answer 3

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