I guess I'm not sure why you can't use a line control to draw the line. If you really want the line to start at the end of the name
1) add the fullname text box to your report
2) add a line named "line1" so the right end is where you want the line to end
3) add code to the On Print of the detail section like:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Dim lngLeft As Long
Dim lngTop As Long
Dim lngBottom As Long
Dim lngRightEnd As Long
Me.Fullname.Visible = False
Me.Line1.Visible = False
lngLeft = Me.Fullname.Left
lngTop = Me.Fullname.Top
lngBottom = lngTop + Me.Fullname.Height
lngRightEnd = Me.Line1.Left + Me.Line1.Width
Me.CurrentX = lngLeft
Me.CurrentY = lngTop
Me.Print Me.Fullname
Me.Line (Me.CurrentX, lngBottom)-(lngRightEnd, lngBottom)
End Sub
Duane Hookom
MS Access MVP
--- In MS_Access_Professionals@yahoogroups.com, "luvmymelody" <luvmymelody@...> wrote:
>
> Hello All,
>
> I would like to create a report that has the first and last names and a line like below for a sign in sheet.
>
> Jim Wagner____________________
> John Doe ____________________
> Frank Smith___________________
>
> Is there a way to do this. or even have it like below
>
> Jim Wagner____________________
> John Doe______________________
> Frank Smith___________________
>
>
>
> Thank You
>
> Jim Wagner
>
Tidak ada komentar:
Posting Komentar