フォルダ内部にあるファイルをすべて取得する方法

フォルダ内部にあるファイルをすべて取得する方法
VB.NET

'「*」はすべてのファイル
Dim files As String() = System.IO.Directory.GetFiles( _
    "C:\search", "*", System.IO.SearchOption.AllDirectories)

Me.ListBox1.Items.AddRange(files)

C#

//「*」はすべてのファイル
string[] files = System.IO.Directory.GetFiles(
    @"C:\search", "*", System.IO.SearchOption.AllDirectories);

this.ListBox1.Items.AddRange(files);

System.IO.DirectoryInfoでファイルを取得する方法
VB.NET

Dim di As New System.IO.DirectoryInfo("C:\search")
Dim files As System.IO.FileInfo() = _
    di.GetFiles("*.txt", System.IO.SearchOption.AllDirectories)

For Each f As System.IO.FileInfo In files
    Me.ListBox1.Items.Add(f.FullName)
Next

C#

System.IO.DirectoryInfo di = new System.IO.DirectoryInfo(@"C:\search");
System.IO.FileInfo[] files =
    di.GetFiles("*.txt", System.IO.SearchOption.AllDirectories);

foreach (System.IO.FileInfo f in files)
{
    this.ListBox1.Items.Add(f.FullName);
}

Directory.EnumerateFilesでファイル一覧を取得する方法
VB.NET

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

For Each f As String In files
    Me.ListBox1.Items.Add(f)
Next

C#

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

foreach (string f in files)
{
    this.ListBox1.Items.Add(f);
}

ファイル一覧を取得する方法（System.IO.DirectoryInfo）
VB.NET

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

For Each f As System.IO.FileInfo In files
    Me.ListBox1.Items.Add(f.FullName)
Next

C#

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

foreach (System.IO.FileInfo f in files)
{
    this.ListBox1.Items.Add(f.FullName);
}

GetFilesでファイル一覧を取得する方法
VB.NET

Public Sub GetAllFiles(ByVal folder As String, _
        ByVal searchPattern As String, ByRef files As ArrayList)
    Dim fs As String() = _
        System.IO.Directory.GetFiles(folder, searchPattern)
    files.AddRange(fs)

    Dim ds As String() = System.IO.Directory.GetDirectories(folder)
    Dim d As String
    For Each d In ds
        GetAllFiles(d, searchPattern, files)
    Next d
End Sub

Dim files As New ArrayList
GetAllFiles("C:\search", "*.*", files)
Me.ListBox1.Items.AddRange(files.ToArray())

C#

public static void GetAllFiles(
    string folder, string searchPattern, ref ArrayList files)
{
    string[] fs =
        System.IO.Directory.GetFiles(folder, searchPattern);
    files.AddRange(fs);

    string[] ds = System.IO.Directory.GetDirectories(folder);
    foreach (string d in ds)
        GetAllFiles(d, searchPattern, ref files);
}

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