Eu queria minimizar todas as janelas que estão abertas quando meu programa fosse carregado, eu peguei esse codigo na area de dicas do site:
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Const WM_COMMAND As Long = &H111
Private Const MIN_ALL As Long = 419
Private Const MIN_ALL_UNDO As Long = 416
'funcao que minimiza
Public Sub MinimizeAll()
Dim lngHwnd As Long
lngHwnd = FindWindow("Shell_TrayWnd", vbNullString)
Call PostMessage(lngHwnd, WM_COMMAND, MIN_ALL, 0&)
End Sub
Acontece que minimiza todas as janelas, menos a do prompt do dos, que no momento da execução do programa é aberta pra executar alguma tarefas, mas eu queria justamente que fosse a do prompt que fosse minimizada...
Alguem sabe o que posso fazer???
