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

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

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

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

ファイルサイズ取得

01''' -----------------------------------------------------------------------
02''' <summary>
03''' ファイルサイズ取得
04''' </summary>
05''' <param name="astrFileName">ファイル名
06''' <returns>ファイルサイズ</returns>
07''' -----------------------------------------------------------------------
08Function GetFileSize(ByVal astrFileName As String) As Long
09    '戻り値初期化
10    GetFileSize = 0
11    Try
12        '出力用ファイルが存在確認
13        If System.IO.File.Exists(astrFileName) = False Then
14            Exit Function
15        End If
16 
17        'FileInfo の新しいインスタンスを生成する
18        Dim fi As New System.IO.FileInfo(astrFileName)
19        'ファイルのサイズを取得
20        GetFileSize = fi.Length
21 
22    Catch ex As Exception
23        'エラー処理が必要な場合は、ここに記述する
24    End Try
25End Function

総アクセス数