Bei Start des eigenen Programms alle anderen Anwendungen minimieren VB-Version:  VB5, VB6
	Views:  8.377

Sie möchten, dass alle offenen Anwendungen minimiert werden, wenn IhrProgramm gestartet wird? Nehmen Sie eine Form, setzen Sie ein paarSteuerelemente drauf und schreiben diesen Code ins Form_Load Ereignis:

Private Sub Form_Load()
  ' Verweis auf das Shell-Objekt erstellen
  Dim ObjShell As New Shell
 
  ' alle Fenster minimieren
  ObjShell.MinimizeAll
  DoEvents
 
  ' eigenes Programm anzeigen
  Me.WindowState = vbNormal
  DoEvents
  Me.Show
End Sub

Zusätzlich benötigen Sie noch einen Verweis auf "Microsoft Shell Controls And Automation", den Sie über das Menü Projekt --> Verweise hinzufügen müssen.

Beim Start der Anwendung werden nun alle anderen Fenster minimiert.

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.