Debug.WriteLine でテキストファイルに出力する

下記の例では、テキストファイル(C:\temp\debuglog.txt)にも Debug.WriteLine の内容を追加書きで出力します。

Dim defaultListener As DefaultTraceListener = DirectCast(Trace.Listeners("Default"), DefaultTraceListener)
defaultListener.LogFileName = "C:\temp\debuglog.txt"

Debug.WriteLine("この文字はテキストファイルにも出力されます。")
Debug.Indent()
Debug.WriteLine("インデントも可能です。")
Debug.Unindent()

メモ：Visual Studio の既定の設定では Debug.WriteLine は出力ウィンドウに出力されます。 → Debug.WriteLineが表示される場所

メモ：Debug.WriteLineはデバッグビルドのときのみ実行されます。

下記の例では、コンソールアプリケーションで、Debug.WriteLine の出力先をテキストファイル(C:\temp\debuglog.txt)だけにします。

Trace.Listeners.Clear()
Dim writer As New IO.StreamWriter("C:\temp\debuglog.txt", True) 'Trueで追加書き。Falseで上書き。
writer.AutoFlush = True
Trace.Listeners.Add(New TextWriterTraceListener(writer))

Debug.WriteLine("この文字はテキストファイルだけに出力されます。")
Debug.Indent()
Debug.WriteLine("インデントも可能です。")
Debug.Unindent()

メモ：デバッグ中はテキストファイルがロックされてしまうので使いにくいかもしれません。上述のテキストファイル「にも」出力する例の方がお勧めです。

メモ：Visual Studio の既定の設定では Debug.WriteLine は出力ウィンドウに出力されます。 → Debug.WriteLineが表示される場所

メモ：Debug.WriteLineはデバッグビルドのときのみ実行されます。