コマンドダイアログ（ファイル操作編）

解決

しょしん 2004-01-11 22:07:42 No: 111223

コマンドダイアログを使ってのファイル操作でaを保存します。
ファイル名を入れると保存できます。

ただファイル名を入れずにキャンセルを押すと
「実行時エラー"75" パス名が無効です」と出て
プログラムが中断してしまいます。ファイル名を入れずに
キャンセルしてもエラーが出ないようにはどうしたら良いでしょうか？

Private Sub Command2_Click()

CommonDialog1.ShowOpen
filename1 = CommonDialog1.filename
Open filename1 For Input As #1
Input #1, a
Close #1
End Sub

魔界の仮面弁士 2004-01-11 23:02:34 No: 111224

CancelErrorプロパティをTrueにしておけば、
[キャンセル]されたかどうかを判定できるようになります。

しょしん 2004-01-11 23:21:14 No: 111225

どうもありがとうございます。

あともう一ついいですか？

ダイアログを選んだ時にtxtの拡張子のモノしか表示されないように
することは出来ますか？

しょしん 2004-01-11 23:45:12 No: 111226

＞ダイアログを選んだ時にtxtの拡張子のモノしか表示されないように
＞することは出来ますか？

出来ました！

しょしん 2004-01-11 23:46:10 No: 111227

ありがとうございました。