Label problem

[beachbum]

Hi Daok
Why not just print your 'label' directly to the form
This may appear to be long code but you could set up a sub to handle all of the formatting and just call for each new label that needs diff internal formats.
Regards
Stuart

Private Sub Command1_Click()
    Dim Variable1 As Long
    Dim Variable2 As Long
    Variable1 = 200
    Variable2 = 350
    
    'Print to Picture box or form
    With Me
        .CurrentX = 400
        .CurrentY = 400
        .FontBold = False
        Me.Print "This is my number : ";
        .FontBold = True
        Me.Print Variable1;
        .FontBold = False
        Me.Print " / " & Variable2
    End With
End Sub
 
Private Sub Command2_Click()
    'You can work out x,y specifics more exactly for your
    'fake label
    Me.Line (400, 400)-(3200, 800), vbButtonFace, BF 'Erase the label before reprint
End Sub