ふぢのＶＢ小技集

ファイルが存在するかチェックしたい
（質問）
あるファイルがあるかチェックする方法を教えてください。
（回答）
Dir関数を使用しましょう。
（解説）
Dir関数を使用すれば簡単にチェックできます。


Dir関数の戻りをチェックする
 

    Dim strResult As String             'Dir関数の戻り値取得エリア

    'Iniファイルが存在するか
    strResult = Dir$(gstrIniPath)
    If strResult = "" Then              'Iniファイルが見つからない

        'エラーメッセージ表示
        MsgBox "Iniファイルが見つかりません。処理を継続することができませんでした。", _
               vbOKOnly + vbCritical + vbApplicationModal, "えらー"

        'プログラムを強制終了する
        End

    End If

戻る