Code:
Form1.WindowState = vbMaximized