Label Hidden Behind PictureBox

[mms_]

Hello,

I am trying to place a label overtop a PictureBox but it will not show.

To demonstrate

Option Explicit

Private Sub Form_Load()
    
    Form1.ScaleMode = vbPixels
    
    Picture1.Appearance = 0
    Picture1.Width = 100
    Picture1.Height = 100
    Picture1.Left = 40
    Picture1.Top = 40
    
    Label1.Width = 50
    Label1.Height = 25
    Label1.Left = Picture1.Left
    Label1.Top = Picture1.Top - 8
    Label1.Caption = "Test"

End Sub

The word Test is partially obscured by the PictureBox.

How can I fix this?

[Zvoni]

Z-Order?

[mms_]

I tried

Label1.ZOrder 0 'bring to front

Still obscured

[Elroy]

VB6 has TWO z-order planes. Basically, the Image and Label control are on one (the lower one), and all other controls are on the other (the higher one). And, everything on that lower z-order plane is always under the higher z-order plane.

However, you can put a label inside of a PictureBox, which often fixes the problem.

Also, just to make a couple of other points. Certain user defined controls can also be on the lower z-order plane. And also, controls on this lower z-order plane do not have hWnd handles. Basically, they're drawn directly onto the form (or whatever its container is) when that form is shown.

Another option that people often use in this situation is a locked TextBox (which will be on the higher z-order plane).

[mms_]

Understood.

Can a label be placed inside the PictureBox at runtime or must it be done at design time?

[SamOscarBrown]

Will this 'trick' do it for you? (Using an array)

Option Explicit
'Add a LABEL array (label(0)) to the FORM in the IDE
'Set its visible property to FALSE
'Set a caption to your Label(0)
'Add a PICTUREBOX to the FORM
'Add a COMMANDBUTTON to the form
'CODE:
Private Sub Command1_Click()
        Load Label1(1)
        Label1(1).Caption = Label1(0).Caption
        With Label1(1)
                'Move this instance of the label array into Picture1
                Set .Container = Picture1
                .Move 90, 90  'Your choice where.
                .Visible = True
        End With
End Sub

[mms_]

That's perfect yes!

Thank you Sam

[SamOscarBrown]

Welcome....you wanna mark this Thread as Resolved (Menu/Thread Tools)?

[vb6forever]

Why don't you just place a label onto the picturebox. Works for me (VB5).

[SamOscarBrown]

They most certainly can (and I would have), but I was just answering their question in post # 5.

Maybe there is a reason....Maybe they want user to see the label on the form first (its visible property would be True), but wants the user to 'move' the label to a picturebox for some unknown reason.