ID von dynamischen Controls auslesen

dersuchende

Grünschnabel
Hallo Zusammen.

Habe folgendes Problem:
Ich erstelle innerhalb einer Picturebox dynamische Labels.
Nun würde ich gerne durch anklicken (Mousedown) der Labels den Namen (ID) auslesen:

z.B.: Ich erstelle Labels mit Label2(1); Label2(3); usw.

Wie kann ich nun die ID (im obigen Beispiel 1 oder 3 auslesen)?

Mein Problem im Detail:

Code:
Private Sub Label9_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)

  If Button = 1 Then
       
    'Nur wie bekomme ich die ID? Mit Label9.Move geht es leider nicht :

    Label9(id).Move Label9(id).Left + X, Label9(id).Top + Y
    Label9(id).Visible = True

  End If

End Sub


Vielen Dank im voraus fuer Eure Hilfe.

LG,
Hans
 
Diese ID nennt man auch Index und ist diesem Sub als Parameter sogar schon übergeben:

Code:
Private Sub Label9_MouseMove(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
  If Button = 1 Then
    Label9(Index).Move Label9(Index).Left + X, Label9(Index).Top + Y
    Label9(Index).Visible = True
  End If
End Sub

mfG,
MAN
 

Neue Beiträge

Zurück