Eigene Anwendung beenden und neu starten Hier wird gezeigt, wie sich die eigene Anwendung sauber beenden und neu starten lässt.
Autor:   Dieter Otter	Bewertung:	Views:  28.163
www.tools4vb.de	System:  Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Mit unserem heutigen Tipp möchten wir Ihnen zeigen, wie sich die eigene Anwendung sauber beenden und neu starten lässt. Fügen Sie hierzu nachfolgenden Code in ein Modul ein:

Option Explicit
 
' Benötigte API-Deklarationen
Private Declare Function ShellExecute Lib "shell32.dll" _
  Alias "ShellExecuteA" ( _
  ByVal hwnd As Long, _
  ByVal lpOperation As String, _
  ByVal lpFile As String, _
  ByVal lpParameters As String, _
  ByVal lpDirectory As String, _
  ByVal nShowCmd As Long) As Long

' Anwendung beenden und neu starten
Public Sub Restart()
  ' zunächst alle Fenster schließen
  Dim oForm As Form
  For Each oForm In VB.Forms
    Unload oForm
  Next
 
  ' jetzt Anwendung neu starten
  ShellExecute 0&, "open", App.Path & "\" & App.EXEName & ".exe", "", "", 1
End Sub

Wann immer die Anwendung beendet und neu gestartet werden soll, rufen Sie einfach die Restart-Prozedur auf.
 

Copyright ©2000-2024 vb@rchiv Dieter OtterAlle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.