Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Access text box borders

1,303 views
Skip to first unread message

claireloughrige

unread,
Oct 12, 2009, 3:59:49 PM10/12/09
to
How can I format text boxes in an Access 2003 report with a single bottom border? This is so easy to do in Crystal, is it not available in Access without writing code?

Thank you.

EggHeadCafe - Software Developer Portal of Choice
Screenscrape Realtime Quotes with Regex and XML
http://www.eggheadcafe.com/tutorials/aspnet/a242f7bc-6dfb-465c-8ff0-6f63b4fbf718/screenscrape-realtime-quo.aspx

fredg

unread,
Oct 12, 2009, 4:24:45 PM10/12/09
to

You can't format a text control with a single border on the bottom,
but did you try placing a line (using the line control) at the bottom
edge of the text control sized to the width of the control?
--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail

Duane Hookom

unread,
Oct 12, 2009, 6:03:01 PM10/12/09
to
Claire,
Have you tried setting the text box Special Effect to "Chiseled"?

If that doesn't work, just a little code gives you a lot of functionality.
Select every control you want underlined and enter UL in the tag properties.
You can do this simultaneously. Then add some code to the On Format event of
the section containing the controls:

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim ctl As Control
Dim intLess As Integer
intLess = 50 'allows you to make the line a _
little shorter than the width of the text box
For Each ctl In Me.Controls
If ctl.Tag = "UL" Then
Me.Line (ctl.Left, ctl.Top + ctl.Height)-Step(ctl.Width -
intLess, 0)
End If
Next
End Sub

If you want, you can set the format, color, or thickness of the line.

--
Duane Hookom
Microsoft Access MVP

0 new messages