サブフォルダをすべて取得する方法

サブフォルダをすべて取得する方法(Directory.GetDirectories)
VB.NET

Dim subFolders As String() = System.IO.Directory.GetDirectories( _
    "C:\search", "*", System.IO.SearchOption.AllDirectories)

Me.ListBox1.Items.AddRange(subFolders)

C#

string[] subFolders = System.IO.Directory.GetDirectories(
    @"C:\search", "*", System.IO.SearchOption.AllDirectories);

this.ListBox1.Items.AddRange(subFolders);

サブフォルダをすべて取得する方法(Directory.GetDirectories)
VB.NET

Dim di As New System.IO.DirectoryInfo("C:\search")
Dim subFolders As System.IO.DirectoryInfo() = _
    di.GetDirectories("*", System.IO.SearchOption.AllDirectories)

For Each subFolder As System.IO.DirectoryInfo In subFolders
    Me.ListBox1.Items.Add(subFolder.FullName)
Next

C#

System.IO.DirectoryInfo di = new System.IO.DirectoryInfo(@"C:\search");
System.IO.DirectoryInfo[] subFolders =
    di.GetDirectories("*", System.IO.SearchOption.AllDirectories);

foreach (System.IO.DirectoryInfo subFolder in subFolders)
{
    this.ListBox1.Items.Add(subFolder.FullName);

}

サブフォルダをすべて取得する方法(Directory.EnumerateDirectories)
VB.NET

Dim subFolders As IEnumerable(Of String) = _
    System.IO.Directory.EnumerateDirectories( _
        "C:\search", "*", System.IO.SearchOption.AllDirectories)

For Each subFolder As String In subFolders
    Me.ListBox1.Items.Add(subFolder)
Next

C#

IEnumerable<string> subFolders =
    System.IO.Directory.EnumerateDirectories(
        @"C:\search", "*", System.IO.SearchOption.AllDirectories);

foreach (string subFolder in subFolders)
{
    this.ListBox1.Items.Add(subFolder);

}

サブフォルダをすべて取得する方法(System.IO.DirectoryInfo)
VB.NET

Dim di As New System.IO.DirectoryInfo("C:\test")
Dim subFolders As IEnumerable(Of System.IO.DirectoryInfo) = _
    di.EnumerateDirectories("*", System.IO.SearchOption.AllDirectories)

For Each subFolder As System.IO.DirectoryInfo In subFolders
    Me.ListBox1.Items.Add(subFolder.FullName)

Next

C#

System.IO.DirectoryInfo di = new System.IO.DirectoryInfo(@"C:\test");
IEnumerable<System.IO.DirectoryInfo> subFolders =
    di.EnumerateDirectories("*", System.IO.SearchOption.AllDirectories);

foreach (System.IO.DirectoryInfo subFolder in subFolders)
{
    this.ListBox1.Items.Add(subFolder.FullName);

}

サブフォルダを取得する方法(基礎)
VB.NET

Public Shared Sub GetSubfolders( _
        ByVal folderName As String, ByRef subFolders As ArrayList)
    Dim folder As String
    For Each folder In System.IO.Directory.GetDirectories(folderName)
        subFolders.Add(folder)
        GetSubfolders(folder, subFolders)
    Next folder
End Sub

Dim subFolders As New ArrayList
GetSubfolders("C:\search", subFolders)
Me.ListBox1.Items.AddRange(subFolders.ToArray())

C#

public static void GetSubfolders(
    string folderName, ref ArrayList subFolders)
{
    foreach (string folder in 
        System.IO.Directory.GetDirectories(folderName))
    {
        subFolders.Add(folder);
        GetSubfolders(folder, ref subFolders);
    }
}

ArrayList subFolders = new ArrayList();
GetSubfolders(@"C:\search", ref subFolders);
this.ListBox1.Items.AddRange(subFolders.ToArray());