change character spacing in a text box

V

vsoeiro

hello to you all,

is there any way i can change character spacing in a text box, just like i
can do in word? it is really important, so i can match spacing in official
documents (i'm using ms access 2003).

thanks in advance,
 
A

Al Campagna

vsoeiro,
I'm assuming a report, assuming field FirstName (with "John Smith") and I'll assume the
text is in the Detail section.

Add an unbound text control to the detail section and call it SpacedText (you can hide
the real FirstName field)
Using the Detail Section OnFormat event...

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim Ctr As Integer, LengthOfText As Integer
Dim BuildStr As String
LengthOfText = Len(FirstName)
For Ctr = 1 To LengthOfText
BuildStr = BuildStr & Mid(FirstName, Ctr, 1) & " "
Next Ctr
SpacedText = BuildStr
End Sub

--
hth
Al Campagna . Candia Computer Consulting . Candia, NH USA
Microsoft Access MVP
http://home.comcast.net/~cccsolutions

"Find a job that you love, and you'll never work a day in your life."
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top