Set it to what? If you want a line across the top only, you can set the
control tag properties to "LineTop" and then add code to the On Format event
like:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim ctl As Control
For Each ctl In Me.Controls
If ctl.Tag = "LineTop" Then
Me.Line (ctl.Left, ctl.Top)-Step(ctl.Width, 0)
End If
Next
End Sub
