Mover con el raton un label de una matriz de controles sobre un picturebox

Question

Hola, mi caso es el siguiente:

Tengo una matriz de controles tipo label (labtext), es dinámica, el usuario puede ir ampliándola a su antojo, una vez creado el label y puesto sobre el picture1 le he aplicado los eventos mousedown y dragdrop de la forma que indico abajo, el problema es que no se como hacer para especificar el indice del label que quiero que se mueva pues siempre me mueve el mismo label, el primero o labtext(0).

Lo que he puesto:

Private Sub Labtext_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
Labtext(i).Drag 1
dragx = X
dragy = Y
End Select
End Sub

Private Sub Picture1_DragDrop(Source As Control, X As Single, Y As Single)
Labtext(i).Left = x-dragx
Labtext(i).Top = y-dragy
End Sub

Answer 1

Hola, proba cambiando la primera linea

labtext(index).drag 1

Saludos Mario

Answer 2

Hola

Proba con este codigo

Private Sub Labtext_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
 Labtext(Index).Drag 1
 dragx = X
 dragy = Y
End Sub

Private Sub Picture1_DragDrop(Source As Control, X As Single, Y As Single)
 Source.Left = x-dragx
 Source.Top = y-dragy
End Sub