Listar todas las carpetas en el directorio

Question

Parece que no se puede encontrar la manera de hacerlo, Google me está fallando.

Por favor ayuda, ¡gracias!

Answer 1

Prueba esto:

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 

estoy usando el método Directory.GetDirectories que devuelve una matriz de cadenas, una para cada subdirectorio del directorio que proporcione como parámetro para el método.

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