Går det att kombinera DragDrop och Labelaray? Om jag sätter DragMode till Automatic på Lablarna så kommer jag inte år Indexvärdet i arrayen och sätter jag DragMode till Manual får jag inte DragDrop att fungera.
Jag vill alltså ha Automatic för en Labelarray.

Det går att komma åt indexvärdet. Detta exempel kanske kan hjälpa dig:
<code>
Private Sub Text1_DragDrop(Source As Control, X As Single, Y As Single)
Text1.Text = "Label1(" & Source.Index & ")"
End Sub
</code>

Det hade jag aldrig kunnat lista ut. Med lite modefikationer så kan jag med denna hjälp tilldela en variabel det index jag blyttar till.

variabel = "" & Source.Index & ""