l lParam As
 Long) As Long
Public Const WM_COMMAND = &amp;H111
Public Const WM_SYSCOMMAND = &amp;H112
Public Const SC_RESTORE = &amp;HF120&amp;

Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA"
 (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Public Const WS_EX_APPWINDOW = &amp;H40000
Public Const WS_EX_TOOLWINDOW = &amp;H80&amp;
Public Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As
 Long, lpdwProcessId As Long) As Long
Public Declare Function GetParent Lib