フォルダ配下のファイル情報取得＠VB.Netのお勉強

フォルダ配下のファイル情報取得＠VB.Net

フォルダ配下のフォルダ名の取得、
また、ListViewにファイル情報を表示します。

Directory.GetFiles(フォルダパス,パターン)にて、
ファイル名を取得することができます。

また、フォルダパスよりDirectoryInfoを生成し、
GetFilesにてFileInfoを取得することで、
ファイル情報を取得できます。

以下では、取得したファイル情報をListViewに表示しています。

Imports system.io

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim fileName As String

        'フォルダ配下のファイル名取得
        For Each fileName In System.IO.Directory.GetFiles("C:\", "*.xls")
            Console.WriteLine(fileName)
        Next

        'フォルダ配下のファイル情報をListViewに表示
        'ListViewの設定
        Me.ListView1.View = View.Details
        Me.ListView1.Width = 300

        'ListViewのヘッダ作成
        Me.ListView1.Columns.Add("名前", 100)
        Me.ListView1.Columns.Add("作成日", 50)
        Me.ListView1.Columns.Add("更新日", 50)

        'DirectoryInfo生成
        Dim dic As System.IO.DirectoryInfo = New DirectoryInfo("C:\")
        Dim fileInfo As System.IO.FileInfo

        'FileInfo取得
        For Each fileInfo In dic.GetFiles("*.xls")
            'ListViewにアイテム追加
            Dim item() As String = {fileInfo.Name, fileInfo.CreationTime.ToString(), fileInfo.LastWriteTime.ToString()}
            Me.ListView1.Items.Add(New ListViewItem(item))
        Next

    End Sub
End Class