how can I bold a portion of a text box?

[Coll]

Hi - I have a function that returns a value to a text field. I need to
bold a portion of the text field to match up with the rest of the
form. I'd rather not split it into two separate text fields because
the text should only display if certain criteria is met, so it's more
complicated with 2 text boxes...

Here is my code...

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Is = "FMLA-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Else
Relation = ""
End Select
End Function

I need to bold "Family Illness Relation:" - Any ideas

[tina]

suggest you check Stephen Lebans' rich text control at
http://www.lebans.com/richtext.htm
to see if that will work for your needs.

hth
"Coll" <co*********@ho tmail.comwrote in message
news:11******** **************@ m36g2000hse.goo glegroups.com.. .

Hi - I have a function that returns a value to a text field. I need to
bold a portion of the text field to match up with the rest of the
form. I'd rather not split it into two separate text fields because
the text should only display if certain criteria is met, so it's more
complicated with 2 text boxes...

Here is my code...

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Is = "FMLA-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Else
Relation = ""
End Select
End Function

I need to bold "Family Illness Relation:" - Any ideas

[Neil]

I think you'd find it simpler and less problematic to just split it into two
controls and work with it that way. But if you insist on having it in one
control, then you can use Stephen Lebans' rich text control, or just use the
MS Rich Textbox 6.0 control, which comes with Access. If you're using Access
2002 or later, then you can't use the built-in Rich Textbox control, so
you'd have to use Stephen's or a similar one. But if you're using Access
2000, then the built-in one should suffice for your needs, as it's a pretty
straightforward thing you're wanting.

Neil
"Coll" <co*********@ho tmail.comwrote in message
news:11******** **************@ m36g2000hse.goo glegroups.com.. .

Hi - I have a function that returns a value to a text field. I need to
bold a portion of the text field to match up with the rest of the
form. I'd rather not split it into two separate text fields because
the text should only display if certain criteria is met, so it's more
complicated with 2 text boxes...

Here is my code...

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Is = "FMLA-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Else
Relation = ""
End Select
End Function

I need to bold "Family Illness Relation:" - Any ideas

[Larry Linson]

Larry said

>(2) Move to Access 2007, in which formatting
of the built-in Text Box has been enhanced.

"Neil" responded

Re. #2, I don't think that's true. I could be
wrong (hope I am, actually), but from what
I've seen and read about the rich text features
in the A07 text box, it doesn't allow
programmatic control of the text.

Help me understand... what part of what I said in #2 is "not true"?
Further, help me understand... in what part of #2 did I state or imply that
the enhancements included programmatic control?

In fact, I haven't done enough with that feature to discuss it in great
detail, but the mere fact that you can bold and italicize text, it seems to
me, qualifies as enhancement. I certainly am careful to avoid terms that
imply "could not be better".

Stephen Lebans at http://www.lebans.com, provides a freely-downloadable
ActiveX control for Rich Text. Several "third parties" provide ActiveX
controls which are _not_ free.

Larry Linson
Microsoft Access MVP

[Neil]

"Larry Linson" <bo*****@localh ost.notwrote in message
news:hcmhi.676$ Pv2.282@trnddc0 3...

Larry said

>(2) Move to Access 2007, in which formatting
>of the built-in Text Box has been enhanced.

"Neil" responded

Re. #2, I don't think that's true. I could be
wrong (hope I am, actually), but from what
I've seen and read about the rich text features
in the A07 text box, it doesn't allow
programmatic control of the text.

Help me understand... what part of what I said in #2 is "not true"?
Further, help me understand... in what part of #2 did I state or imply
that the enhancements included programmatic control?

The original poster wrote:

===== start original post =======
Hi - I have a function that returns a value to a text field. I need to
bold a portion of the text field to match up with the rest of the
form. I'd rather not split it into two separate text fields because
the text should only display if certain criteria is met, so it's more
complicated with 2 text boxes...

Here is my code...

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Is = "FMLA-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Else
Relation = ""
End Select
End Function

I need to bold "Family Illness Relation:" - Any ideas
====== end original post =========

So he needs to be able programmaticall ly bold "Family Illness Relation" in
his text box, while leaving the Details2 portion of text unbolded. You
suggested that he could accomplish this by upgrading to A07 with its new
rich text features. I was saying that upgrading to A07 would not accomplish
that, since it doesn't allow for programmatic control of rich text, which he
needs.

>
In fact, I haven't done enough with that feature to discuss it in great
detail, but the mere fact that you can bold and italicize text, it seems
to me, qualifies as enhancement. I certainly am careful to avoid terms
that imply "could not be better".

Stephen Lebans at http://www.lebans.com, provides a freely-downloadable
ActiveX control for Rich Text. Several "third parties" provide ActiveX
controls which are _not_ free.

Yes, and there's also the Microsoft Rich Textbox 6.0, which is included with
Access, but which only works through Access 2000. That one would be plenty
good for what he's trying to accomplish, as long as he's in A2000 or
earlier.

Neil

>
Larry Linson
Microsoft Access MVP

[Neil]

I was looking at your note again, and I really don't see why it would be
more complicated to have two text boxes. It's quite simple really. Call the
first one RelationLabel, and leave the second one Relation. Your code would
be:

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
RelationLabel = "Family Illness Relation: "
Relation = Details2
Case Is = "FMLA-Family Illness"
RelationLabel = "Family Illness Relation: "
Relation = Details2
Case Else
RelationLabel = ""
Relation = ""
End Select
End Function

Better yet would be to just use an actual label for the RelationLabel part,
and just set its Visible property as needed:

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
RelationLabel.V isible = True
Relation = Details2
Case Is = "FMLA-Family Illness"
RelationLabel.V isible = True
Relation = Details2
Case Else
RelationLabel.V isible = False
Relation = ""
End Select
End Function

That doesn't seem to me to be complicated at all. And it's a lot more
straightforward than having to deal with implementing an ActiveX control
across various workstations.

Neil
"Coll" <co*********@ho tmail.comwrote in message
news:11******** **************@ m36g2000hse.goo glegroups.com.. .

Hi - I have a function that returns a value to a text field. I need to
bold a portion of the text field to match up with the rest of the
form. I'd rather not split it into two separate text fields because
the text should only display if certain criteria is met, so it's more
complicated with 2 text boxes...

Here is my code...

Function Relation(LOA2 As Variant, Details2 As Variant)
Select Case LOA2
Case Is = "Personal-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Is = "FMLA-Family Illness"
Relation = "Family Illness Relation: " & Details2
Case Else
Relation = ""
End Select
End Function

I need to bold "Family Illness Relation:" - Any ideas