tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル FileOpenは使用しないほうがいい?
投稿日: 2008/04/21(Mon) 18:22
投稿者皐月
こんにちはお世話になっております。VB2005にて開発を行っております。
VB6.0からの移行で以下のようなソースを記述しました。
一応問題なく動作するのですが、「.ShowDialog()」で保存をするウィンドウを開いてキャンセルをしたときにFileOpenの部分で「パス/ファイル アクセス エラー」と警告が表示され、イミディエイトウィンドウで「'System.IO.IOException' の初回例外がMicrosoft.VisualBasic.dll で発生しました。」と表示されます。

一応例外処理は記述してあるので問題ないとは思っているのですが、イミディエイトウィンドウの表示や例外設定の設定によっては毎回かかるので少々気になっています。
この警告は消えることはないのでしょうか?

msdnのHPを見ますと、FileOpenの代わりに.Netから「My.Computer.FileSystem オブジェクト」が推奨されていることを知ったのですが、こちらを使用したら解決されるのでしょうか?このままFileOpenを使用していってもよいのか少し悩んでおります。
どうかアドバイスをお願いします。

    Private Sub Menu_Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Menu_Save.Click

        Dim Freenumber As String

        With SaveFileDialog1
            Try
                ChDrive(My.Application.Info.DirectoryPath)
                ChDir(My.Application.Info.DirectoryPath & "\Setdata")
                .ShowDialog()

                Freenumber = CStr(FreeFile())
                FileOpen(CInt(Freenumber), .FileName, OpenMode.Output)
                'データ保存
                      ・
                      ・
           ・
                FileClose(CInt(Freenumber))
                Exit Sub

            Catch ex As System.IO.IOException
                ChDrive(My.Application.Info.DirectoryPath)
                ChDir(My.Application.Info.DirectoryPath & "\Setdata")
            End Try
        End With

    End Sub

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。