Can someone explain this to me. I currently have the following code. It draws two lines at the border of my report. The lines on the first page are shorter than the ones on all the other pages. The problem is that the linewith of the first page is ok, but the linewith of all other pages gets reset to a very thin line
I need a thicker line on those pages too
This is what I have right now
This is what I have right now
Code:
Private Sub Report_Page()
Dim lcolor As Long
Me.ScaleMode = 7
Me.DrawWidth = 11
lcolor = RGB(0, 0, 0)
If Me.Page = 1 Then
Me.Line (0, 9.4)-(0, 25.2), lcolor
Me.Line (20.09, 9.35)-(20.09, 25.2), lcolor
Else
Me.Line (0, 3.5)-(0, 25.2), lcolor
Me.Line (20.09, 3.5)-(20.09, 25.2), lcolor
End If
End Sub