Vertical lines not appearing in 2nd page of a report

[Ultima67]

Hello,

I have got a report that generate invoices. I need to draw vertical lines to separate information (item, qty, prices...) in the detail section.
I have put the code below on the On Print Event

[FONT=Arial]Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)[/FONT]
[FONT=Arial]Dim X1 As Single[/FONT]
[FONT=Arial]Dim X2 As Single[/FONT]
[FONT=Arial]X1 = 0.195 * 1440[/FONT]
[FONT=Arial]X2 = 0.697 * 1440[/FONT]
[FONT=Arial]Me.Line (X1, 0)-(X1, Me.Height)[/FONT]
[FONT=Arial]Me.Line (X2, 0)-(X2, Me.Height)[/FONT]
[FONT=Arial]End Sub[/FONT]

It works perfecly for the first page, but no lines display on the second page when there is one. The Can Grow property of the Detail section is already set to Yes.

Thank you in advance for your help.

Regards,
Sylvie

 

[llkhoutx]

Change the shade of the right border of the appropriate text boxes on the detail section, OnFormat event.

 

[Ultima67]

Thank you for your answer.
Unfortunatly, I am not sure to understand what you mean. Could you please be more specific?

Regards,
Sylvie