 
Sub Form_Load () 
    ..... do miscellaneous housekeeping and setup routines here ..... 
    Unload Banner             '  Eliminate user's message  
    Screen.MousePointer = 0   '  set to normal Arrow Pointer  
End Sub 
