Hi Gordon,
Well, that wasn't my problem.
The only thing I was able to figure out to do about it was something like this:
When I got to the part with LockScreen = .F., I put in .PageFrame.Height = .PageFrame.Height.
That made the problem go away.

>Had the same problem...
>
>Try...
>
>.Width = nNewWidth
>.Height = nNewHeight
>
>
>Your current code might look like this...
>
>.Height = nNewHeight
>.Width = nNewWidth
>
>
>It just so happens that when you resize, you should adjust the height last.