Jag har en PictureBox (eller ImageBox om det är bättre) där jag vill att en Label skall skapas när man klickar på bilden och med centrum där muspekaren är. Hur kan jag åstakomma detta?

Private mLabelCount As Long

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim NewLabel As Label
mLabelCount = mLabelCount + 1
Set NewLabel = Controls.Add("VB.Label", "PicLabel" & mLabelCount, Picture1)
NewLabel.AutoSize = True
NewLabel.Caption = "PicLabel" & mLabelCount
NewLabel.Move X - NewLabel.Width / 2, Y - NewLabel.Height / 2
NewLabel.BackStyle = vbTransparent
NewLabel.Visible = True
End Sub

Det är så perfekt det kan bli!!!

du kan skapa en label control array istället..

skapa en labale med index 0 använd sedan koden :

load lbltest(x)

istället för controls.add