2013-12-23 6 views
9

VBAのデバッグでは、コード全体でいくつかのDebug.Printステートメントがあります。行解析ブロックでは、行を印刷して、多くのif/elseif/elseブロックに複数のDebug.Print sFlag & sLineステートメントを持たずに、フラグのインラインを行に出力したいと思います。VBA:改行なしのDebug.Print?

Debug.Printステートメントの最後に改行を抑制する方法はありますか?

答えて

11

Debug.Printステートメントの末尾にセミコロンを追加するだけで簡単に行うことができます。これと同じように:

While oExec.StdOut.AtEndOfStream = False 
    sLine = oExec.StdOut.ReadLine 
    If bInFileSystem Then 
     If AnalyzeFileSystemLine(sLine) = False Then 
     Debug.Print "[FSERR]: "; 
     End If 
    ElseIf bInWASCheck Then 
     If AnalyzeWASLine(sLine) = False Then 
     Debug.Print "[WASERR]: "; 
     End If 
    End If 

    Debug.Print sLine 
Wend 

ので、いくつかのサンプル出力は次のようになります。

test text things look good! 
[FSERR]: uh oh this file system is at 90% capacity! 
some more good looking text :) 
[WASERR]: oh no an app server is down! 
+0

ピタッ。 'Debug.Print'を' Wend'の一番下に置くこともできます。 'Wend'の上の行をセミコロンで閉じます。同じ結果。 – Smandoli