Ralf

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Label1.BackColor = Color.Transparent
        Label1.Parent = PictureBox1
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Label1.BackColor = Color.Transparent
        Dim p As Point = Label1.PointToScreen(Label1.Location)
        Label1.Parent = PictureBox1
        Label1.Location = Label1.PointToClient(p)
    End Sub

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist

 With PictureBox
 
            .Name = "picturebox_" & pBoxCounter
            .Location = New Point(posLeft, posTop)
            .Size = New System.Drawing.Size(75, 90)
            .SizeMode = PictureBoxSizeMode.Zoom
            .BackColor = SystemColors.Control
 
            AddHandler PictureBox.Click, AddressOf picturebox_Click
 
 
        .Tag = pBoxCounter
        ' PictureBox ins Control () einfügen
        Me.FlowLayoutPanel1.Controls.Add(PictureBox)
        ' Bild in die Picturebox einfügen
        .Image = My.Resources.UserGreen
        End With
 
 
        ' Beschriftung der Box
        Dim myLabel As Label = New Label
 
        myLabel.AutoSize = False
        myLabel.Width = 90
        myLabel.Height = 10
        myLabel.TextAlign = ContentAlignment.MiddleCenter
        myLabel.Text = "hallo-test"
        myLabel.Font = New Font("Arial", 10, FontStyle.Bold)
        myLabel.BackColor = Color.Transparent
 
        Dim p As Point = myLabel.PointToScreen(myLabel.Location)
        myLabel.Parent = PictureBox
        myLabel.Location = myLabel.PointToClient(p)
        PictureBox.Controls.Add(myLabel)