VBA: Debug.Drucken ohne Zeilenumbruch?

Für das Debuggen in VBA, habe ich mehrere Debug.Print den Aussagen in meinem code. Für ein line-parsing-block, ich möchte drucken Sie die Linie, und die Ausgabe aller flags inline mit der Linie, die zimmerreserviereung, ohne das mehrere Debug.Print sFlag & sLine Aussagen über die vielen if/elseif/else-Blöcken.

Gibt es eine Möglichkeit, in VBA, unterdrückt den Zeilenvorschub am Ende einer Debug.Print Aussage?

InformationsquelleAutor armstrhb | 2013-12-23
  1. 16

    Es stellt sich heraus, Sie können ganz einfach tun dies, indem Sie einfach ein Semikolon an das Ende Ihrer Debug.Print - Anweisung. Etwa so:

    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

    So, einige Beispiel-Ausgabe:

    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!
    • Ganz richtig ist. Man könnte auch Debug.Print auf ganz unten, unter Wend. Schließen Sie dann die Zeile oben Wend mit einem Semikolon. Gleichen Ergebnis.
    InformationsquelleAutor armstrhb
Schreibe einen Kommentar