Sub SetWindowFullscreen( flag)

You will never guess what this does