В полный экран (при открытии)
Private Sub Form_Load()
'В полный экран :
DoCmd.Maximize
End Sub
Вернуть нормальный размер (какой был до разворачивания в полный экран или до свёртывания)
DoCmd.Restore