Repeating a line until the end of a report

[Luiz Cláudio C. V. Rocha]

Hi,

I have a report and on its last page I cannot have blank
space between the last detail and the page footer (I have
to fill this space with "X*X*X*X*X*X*X*X*X*X*X*X").

So I created a textbox filled with "X*X*X*X*X*X*X*X" on
the report footer, and used the following code (Format
Event) to repeat this textbox to the end of the page:

If Me.Page = Me.Pages Then
Me.MoveLayout = True
Me.NextRecord = False
Me.PrintSection = True
Else
Me.PrintSection = False
Me.NextRecord = True
Me.MoveLayout = False
End If

It works fine on the last page, but there is a problem:
it's creating one blank page (Page 12 of 11 !!), because
the last "X*X*X*X*X*X" always goes to the next page, even
if I cancel the event.

How can I fix that?