Läuft die Anwendung in der IDE IV Viele Wege führen nach Rom... deshalb stellen wir Ihnen hier noch eine Variante vor, wie man prüfen kann, ob die Anwendung in der IDE oder als EXE ausgeführt wird.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  15.089
www.tools4vb.de	System:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 26 Bewertung insgesamt: nützlich Durchschnittliche Bewertung: 3.4 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Viele Wege führen nach Rom

Nachfolgend stellen wir Ihnen eine weitere Variante vor, mit der sich prüfen lässt, ob die Anwendung in der VB-IDE oder als eigenständige EXE ausgeführt wird.

Wie wir alle wissen, wird beim Versuch eine Zahl durch Null zu teilen ein Laufzeitfehler ausgelöst:

a = 1 / 0

Viele von uns wissen aber nicht, daß Debug.Print ...-Anweisungen nur ausgeführt werden, wenn das Projekt in der Entwicklungsumgebung ausgeführt wird. Beim Kompilierten werden diese Anweisungen nämlich gar nicht erst berücksichtigt.

Wenn wir jetzt diese beiden Feststellungen kombinieren, kommt folgendes dabei heraus:

Debug.Print 1 / 0

Wird das Programm in der VB-IDE ausgeführt erhalten wir an dieser Stelle den Laufzeitfehler "11 - Division durch Null unzulässig". Wird das Programm aber als kompilierte EXE-File ausgeführt, fehlt diese Zeile - es erscheint also keine Fehlermeldung. Ergo: Mit "Debug.Print 1 / 0" lässt sich schnell prüfen, ob die Anwendung in der IDE oder als EXE ausgeführt wird.

Hier der vollständige Code (als Funktion verpackt):

' IDE oder EXE?
Public Function IsIDE() As Boolean
  On Local Error Resume Next
  Debug.Print 1 / 0
  IsIDE = (Err <> 0)
End Function