Rich Text Box - can't get border to disappear

KSimm

Registered User.
Local time
Today, 04:05
Joined
Dec 8, 2004
Messages
12
I'm using Access 2000.

I've got a report with Active X rich text boxes that change the font from regular black to bold red based upon the value. That part is working fine.

For the life of me, I can't get the darn border to disappear. I've set the border to 0 using the properties box. I've even tried to code it:

Code:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)

Dim strDTAPFLAG As String

strDTAPFLAG = Me.DTAPFLAG.Value

With DTAPFLAGX
If strDTAPFLAG = "NEEDED" Then
.BorderStyle = 0
.SelColor = 255
.SelBold = True
.SelText = strDTAPFLAG
Else
    If strDTAPFLAG = "DONE" Then
    .BorderStyle = 0
    .SelColor = 0
    .SelBold = False
    .SelText = strDTAPFLAG
    End If
End If

End With

End Sub

I've even tried to set the border color to white, but no dice. I've tried google, and searching the forums here, but haven't been able to solve my problem. Can anyone point me in the right direction?

Much thanks.
 
For some reason simply posting a question here seems to result in me finding the answer a few minutes later. :D

I needed to select the rich text box and view the properties menu. Then I needed to click on the ellipses for the "Custom" property.

That opened up a dialogue box "RichtextCtrl Properties" on which I could select the "Appearance" tab. There's a drop down menu next to "BorderStyle" that allows you to set it to "0-rtfNoBorder".

Thought I'd share the solution in case anyone else runs into the same problem.

Happy report writing! :rolleyes:
 

Users who are viewing this thread

Back
Top Bottom