VB.NET Tips - ファイルサイズ取得

指定されたファイルの存在を確認し、ファイルの FileInfo を取得し、FileInfoのファイル長を取得する関数です。

System.IO.FileInfo クラスについて

■コンストラクタ
Public Sub New ( fileName )
fileName:
    ファイルのドライブ名からの完全パス名または相対ファイル名。
■プロパティ抜粋
・Length       (Long)   :現在のファイルのサイズをバイト単位で取得します。
・Name         (String) :ファイルの名前を取得します。ファイル拡張子が含まれています。
・FullName     (String) :ファイルのフルパス名を取得します。
・DirectoryName(String) :ディレクトリの絶対パスを表す文字列。
・Extension    (String) :ファイルの拡張子部分を表す文字列を取得します。

ファイルサイズ取得

    ''' -----------------------------------------------------------------------
    ''' 

    ''' ファイルサイズ取得
    ''' 
    ''' ファイル名
    ''' ファイルサイズ
    ''' -----------------------------------------------------------------------
    Function GetFileSize(ByVal astrFileName As String) As Long
        '戻り値初期化
        GetFileSize = 0
        Try
            '出力用ファイルが存在確認
            If System.IO.File.Exists(astrFileName) = False Then
                Exit Function
            End If

            'FileInfo の新しいインスタンスを生成する
            Dim fi As New System.IO.FileInfo(astrFileName)
            'ファイルのサイズを取得
            GetFileSize = fi.Length

        Catch ex As Exception
            'エラー処理が必要な場合は、ここに記述する
        End Try
    End Function