BCX Console Demonstration Program s51.bas

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