By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
454,101 Members | 959 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 454,101 IT Pros & Developers. It's quick & easy.

Rich Text Box - Lebans

P: n/a
NB
Hi,
Is it possible to set the default font size and name, etc for the
Leban's Rich Text box. I am using the latest version 1.5 but the
following code does not work (but also produces no errors.)

Dim x As RTF2
Dim fnt As New StdFont

Set x = Me!rchtxtCalendar.Object
With fnt
.Name = "arial"
.Size = 44
.Italic = False
.Bold = False
.Strikethrough = False
.Underline = False
End With

set x.Font = fnt
Thanks
Nigel
Nov 12 '05 #1
Share this Question
Share on Google+
3 Replies


P: n/a
Sorry, that Prop has not been hooked up yet. I'll add it to the next
release.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"NB" <nb****@aol.com> wrote in message
news:54**************************@posting.google.c om...
Hi,
Is it possible to set the default font size and name, etc for the
Leban's Rich Text box. I am using the latest version 1.5 but the
following code does not work (but also produces no errors.)

Dim x As RTF2
Dim fnt As New StdFont

Set x = Me!rchtxtCalendar.Object
With fnt
.Name = "arial"
.Size = 44
.Italic = False
.Bold = False
.Strikethrough = False
.Underline = False
End With

set x.Font = fnt
Thanks
Nigel


Nov 12 '05 #2

P: n/a
I hooked up the SetFont prop tonight. It now accepts a StdFont object as
the input as per your example. Some more testing is required before
release but I will try to put the new version on my site tomorrow night
or Wed at the latest.
:-)
--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
"NB" <nb****@aol.com> wrote in message
news:54**************************@posting.google.c om...
Hi,
Is it possible to set the default font size and name, etc for the
Leban's Rich Text box. I am using the latest version 1.5 but the
following code does not work (but also produces no errors.)

Dim x As RTF2
Dim fnt As New StdFont

Set x = Me!rchtxtCalendar.Object
With fnt
.Name = "arial"
.Size = 44
.Italic = False
.Bold = False
.Strikethrough = False
.Underline = False
End With

set x.Font = fnt
Thanks
Nigel


Nov 12 '05 #3

P: n/a
NB
Thanks for your quick responses. Its a great control.
Nov 12 '05 #4

This discussion thread is closed

Replies have been disabled for this discussion.