vb.net OpeningTextFileWriterの後のコード割り込み

Question

悪いタイトルで申し訳ありませんが、私は自分の問題を簡単に記述する方法を知らない。

私はアプリケーションを実行します。それはファイルにテキストを書き込まなかった。 MessageBoxのコードを追加して、コードがどこに割り込むのかを確認しました。 MsgBox 1と2は表示されていますが、3は表示されていません。したがって、コードは後で中断します：

file = My.Computer.FileSystem.OpenTextFileWriter("C:\text.txt", True) 

なぜですか？

Form1.vbを：

​​

Main.vb：

Public Class Main 
Sub Main() 
    MessageBox.Show("1") 
    Dim file As System.IO.StreamWriter 
    MessageBox.Show("2") 
    file = My.Computer.FileSystem.OpenTextFileWriter("C:\text.txt", True) 
    MessageBox.Show("3") 
    file.WriteLine("Text") 
    file.Close() 
End Sub 

Answer 1

私はあなたのエラーを取得するためのtry..catch statetementの..notのメッセージボックスを使用することをお勧めします、それはあなたをキャッチします原因の問題。例：ファイルが存在しない場合。

Public Class Main 
    Sub Main() 
     Dim file As System.IO.StreamWriter = My.Computer.FileSystem.OpenTextFileWriter("C:\text.txt", True) 
     Try 

      file.WriteLine("Text") 

     Catch ex As Exception 

      MessageBox.Show(ex.Message, "", MessageBoxButtons.OK, MessageBoxIcon.Exclamation) 
     Finally 
      File.Close() 

     End Try 
    End Sub 

End Class