[VB.NET]GetFilesで指定ディレクトリのファイルの一覧を取得

2021年9月15日

書式
1.Public Shared Function GetFiles (path As String, searchPattern As String, enumerationOptions As EnumerationOptions) As String()
指定したディレクトリ内にあり、指定した検索パターンと列挙オプションに一致するファイルの名前 (パスを含む) を返します。

2.AllDirectories
検索操作に現在のディレクトリとすべてのサブディレクトリを含めます。

3.TopDirectoryOnly
検索操作に現在のディレクトリのみを含めます

使用例

Imports System.IO
Imports System.Text

Module Module1

    Sub Main()
        'ファイルパス変数名
        Dim filePath As String = "C:\data\arkgame"

        'String型配列名fileName
        Dim fileName() As String

        Try
            'AllDirectories 現在のフォルダとサブフォルダ含める 
            '拡張子csvのみ取得
            fileName = System.IO.Directory.GetFiles(filePath, "*.csv", System.IO.SearchOption.AllDirectories)
            Console.WriteLine("ファイルの一覧")

            'ファイル一覧のファイル名を取得
            For Each fn As String In fileName
                Console.WriteLine(fn)
            Next
        Catch e As Exception
            Console.WriteLine(e.Message)
        End Try

        Console.ReadKey()

    End Sub

End Module

実行結果
ファイルの一覧
C:\data\arkgame\resule.csv
C:\data\arkgame\sample.csv
C:\data\arkgame\sample02.csv
C:\data\arkgame\stu\sample03.csv
C:\data\arkgame\stu\test01.csv
C:\data\arkgame\stu\test02.csv

VB.net

Posted by arkgame