BCX Console Demonstration Program S51.bas

 '------------------------------------------------------------
 'This simple one line program will minimize all windows
 '------------------------------------------------------------
 
 PostMessage(FindWindow("Shell_TrayWnd", NULL), WM_COMMAND, 419, 0)