Folgender Code hilft Ihnen dabei,
    alle offenen Fenster zu minimieren.
    Gleichzusetzen mit der Tastenkombination Win95+M

ERFORDERLICHE OBJEKTE

   1 Commandbutton (Command1)

 FORM-CODE

   Private Declare Sub keybd_event Lib "user32" _
      (ByVal bVk As Byte, ByVal bScan As Byte, _
      ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

   Private Sub Command1_Click()
      'Win 95 - Taste drücken
      keybd_event &H5B, 0, 0, 0
      'M - Taste drücken
      keybd_event 77, 0, 0, 0

      'M - Taste loslassen
      keybd_event &H5B, 0, &H2, 0
      'Win 95 - Taste loslassen
      keybd_event 77, 0, &H2, 0
   End Sub