Läuft eine Anwendung gerade im Debug-Modus in der VB-IDE? Oder
läuft sie als kompilierte, ausführbare Datei? Visual Basic liefert
die Antwort nur indirekt - es gibt Anweisungen, die nur im
Debug-Modus aufgerufen werden, in der kompilierten EXE jedoch
ignoriert werden. Zu diesen Anweisungen zählt beispielsweise die
Print-Methode des Debug-Objekts.
So können Sie in Verbindung mit einer kalkulierten Fehlerauslösung
feststellen, in welchem Modus die Anwendung läuft - zum Beispiel:
On Error Resume Next
Debug.Print 1 / 0
If Err.Number Then
' Anwendung läuft im Debug-Modus in der VB-IDE
Else
' Anwendung läuft als kompilierte Anwendung
End If
Sie können aber auch anstelle dieser etwas umständlichen
Fehlerbehandlung eine Funktion von Debug.Print
ausführen lassen. Eine Sub-Prozedur funktioniert hier leider nicht,
da Debug.Print ja einen Wert, hier also einen
Rückgabewert einer Funktion darstellen will bzw. muss. Der
Rückgabewert selbst ist allerdings unbedeutend, es sei denn Sie
verwenden ihn zugleich im ursprünglichen Sinne der
Debug.Print-Verwendung zur Anzeige eines Wertes im Direktfenster.
Function WirdNurImDebugModusAusgefuehrt()
' Code, der nur im Debug-Modus ausgeführt werden soll
End Funktion
Debug.Print WirdNurImDebugModusAusgefuehrt()

|