(...)
Insert a line into the detail section. Make the line width = 0cm and the
hieght should be the same as the hieght of the detail section.
But what about CanGrow Property? This method does not work then.
Better to use following code in report's detail section:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim i As Integer, CRight As Integer, C As Control
For i = 0 To Me.Controls.Count - 1
Set C = Me.Controls(i)
If C.Section = 0 Then
If C.Left + C.Width > CRight Then
CRight = C.Left + C.Width
End If
Me.Line (C.Left, 0)-(C.Left, Me.Section(0).Height * 10)
End If
Next i
Me.Line (CRight, 0)-(CRight, Me.Section(0).Height * 10)
End Sub
K.P.
http://www.access.vis.pl