Hi

I wonder whether it is possible to use different colors in a labels
caption. I would like it to look something like this.

The word XXXXXX are inserted in the database.

Any help would be highly appreciated.

Cheers
Karsten

You cannot.

You can use a rich-text box, and manipulate its properties to make it act like a label.

Alternately, you can take a screenshot of what you want the text to look like, trim it, etc., then put that into your form as an image that looks like a label. (After all, the whole screen is just an image, right?)

As an alternative, you can use the Print method and print the text yourself in the Paint event. Use CurrentX and CurrentY to position the text, and ForeColor to change the color. Otherwise, you can do with an array of labels, setting different colors.
Marco

Hi guys
Thanks

Cheers
Karsten

Marco, How would that work? (I don’t mean “Are you nuts?!?” I mean “What does this machinery look like, under the hood?”) Seems interesting; I'd like to hear more.

do you mean using Print or an array of Labels? And yes, sometimes I go nuts :)

Marco

Yeah. What does it entail to use the Print method? Whose Print method? The form? The label?

It seems that would involve the printer, not the screen?
What triggers the Paint event?

The Print method takes a Forecolor argument?

(And so on . . . )

Print is a method of the Printer, but also of the Form object, although it is hidden (that is, it does not work within a With block). Print just prints a text in the form, but because the text is not static, it must be printed every time the form gets a Paint event. The text is printed at the coordinates set by CurrentX and CurrentY, using the Forecolor color (all are properties of the FOrm object) Like:

Private Sub Form_Paint()
    Me.CurrentY = 10
    Me.CurrentY = 100
    Me.ForeColor = vbBlack
    Me.Print "This is a text"
    Me.ForeColor = vbRed
    Me.CurrentY = 100
    Me.CurrentX = Me.CurrentX + Me.TextWidth("This is a text") + 10
    Me.Print "and this is in red"
End Sub

Marco

So then, what you are doing is dressing up the surface of the form. There is no actual label saying "This is a text and this is in red." The "text" shows, but it is not a 'thing' (as a label would be). It is "drawing" the text on the face of the form, yes?

As I initially looked at it, it seemed that there would be a chore involved in lining everything up.
But the offset being calculated by Me.TextWidth(...) + 10 is a terrific solution; the machine finds out for itself how far to offset the 2nd string.

It does seem a bit of a drawback that there is no lebel to intercept the Click event of... (I suppose you could put an invisible button over the area where the text was drawn.)

If the button is invisible, you do not get any Click event... If you need a Click, much better to paint the label on a PictureBox (with no border), sized to match the printed string. The PictureBox has a Click and Paint event, and supports the Print method
Marco