VB-Homepage Tipp 033
Wie wurde das Programm beendet
Mitunter ist es wichtig zu wissen, wie das Programm beendet wurde.
Dies kann einmal über das Menü oder bei Win95/98/NT über den X-Button oder über das Beenden aus dem Programmcode heraus oder über den Task-Manager oder über das Beenden von Windows selbst erfolgen.
Und genau diese vier Zustände können über den folgenden Tipp abgefangen und ausgewertet werden.
Geben Sie dazu lediglich nachfolgende Syntax in das QueryUnload Ereignis der Form ein

If Unloadmode = 0 Then MsgBox "Beendet über Systemmenü"
If Unloadmode = 1 Then MsgBox "Beendet über Programmcode"
If Unloadmode = 2 Then MsgBox "Beendet über Windowsende"
If Unloadmode = 3 Then MsgBox "Beendet über Task-Manager"
If Unloadmode = 4 Then MsgBox "Beendet über MDI-Form"

Sie können natürlich jede andere Aktion auslösen,
hier wird je nachdem wie das Programm beendet wurde,
lediglich ein Miteilungsfenster angezeigt.
Tipp-Download
Quelle :
Zurück zur Übersichtsseite