sub MinimizeWindow()
Minimizes the window