コマンドダイアログ（ファイル操作編）（続く） (ID:111229)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ユーザーが "キャンセル" ボタンをクリックした場合の処理が必要です。 CommonDialog1.CancelError = True On Error GoTo ErrorHandler CommonDialog1.ShowOpen filename1 = CommonDialog1.FileName Open filename1 For Input As #1 Input #1, a Close #1 ErrorHandler: '"キャンセル"がクリックされた場合の処理 Exit Sub(又は Exit Function)