Hallo,
ich habe folgenden Code um ein Steuerelementefeld zu erstellen.
Nicht wundern, da fehlen verschiedene Deklarationen für etliche Werte, Felder und Strukturen
und folgenden Code um auf das Click-Ereigniss zu reagieren
Wie man sieht ist es ja ein Zweidimensionales Steuerelemente-Feld, was sich an anderen Steuerelementen ausrichtet. (Group-Box)
Meine Frage ist:
Wie bekomme ich im Click-Ereigniss gesagt, welches Steuerelement ich gerade geklickt habe, ohne mir das über die Tag-Eigenschaft mitzuteilen oder alle Labels "Bist du der Richtige" zu fragen.
Gibt es irgendeine Funktion oder Eigenschaft, die mir die zwei Indexe liefert?
Grüße
ich habe folgenden Code um ein Steuerelementefeld zu erstellen.
Nicht wundern, da fehlen verschiedene Deklarationen für etliche Werte, Felder und Strukturen
VB.NET-Quellcode
- Public Sub zahlen_anzeigen()
- 'Angaben 2 für Berechnung
- Dim Spalte, Zeile As Integer
- Dim Rand_oben_L, Rand_Links_L As Integer
- Dim Rand_oben_S, Rand_Links_S As Integer
- Dim ZW1 As Double, I, TI As Integer 'Tipp-Index
- Dim MEX1, MEY1, MEX2, MEY2 As Integer
- Dim GEX, GEY As Integer 'ME.Witdh (X); Gesamt X (der Felder und abstand)
- 'Grundwerte berechnen
- X_br = Convert.ToInt16(Lottoschein.Muster.Width)
- Y_hö = Convert.ToInt16(Lottoschein.Muster.Height)
- abstand = 5
- MEX1 = Lottoschein.Lbox1.Width - OX
- MEY1 = Lottoschein.Lbox1.Height - OY
- MEX2 = Lottoschein.Lbox1.Width - OX
- MEY2 = Lottoschein.Lbox1.Height - OY
- GEX = MaxSp * X_br + (MaxSp - 1) * abstand
- GEY = MaxZe * Y_hö + (MaxZe - 1) * abstand
- Rand_Links_L = Convert.ToInt16((MEX1 - GEX) / 2)
- Rand_oben_L = Convert.ToInt16((MEY1 - GEY) / 2)
- Rand_Links_S = Convert.ToInt16((MEX2 - GEX) / 2)
- Rand_oben_S = Convert.ToInt16((MEY2 - GEY) / 2)
- ReDim LLZ(MaxIx, MaxIx_T) 'Label-Zahl
- For B = 1 To 2
- For A = 1 To 5
- TI = A + (B - 1) * MaxSP_T
- For I = 1 To MaxIx
- LLZ(I, TI) = New Label
- ZW1 = (I - 1) / MaxSp
- Spalte = Convert.ToInt16((ZW1 - Math.Truncate(ZW1)) * MaxSp)
- Zeile = Convert.ToInt16(Math.Truncate(ZW1))
- With LLZ(I, TI)
- ' Definiert das Click-Ereignis
- AddHandler LLZ(I, TI).Click, AddressOf LLZ_Click
- .Parent = Lottoschein
- .BringToFront()
- .BorderStyle = BorderStyle.FixedSingle
- .BackColor = Lottoschein.Muster.BackColor
- .Font = Lottoschein.Muster.Font
- .TextAlign = Lottoschein.Muster.TextAlign
- .Width = X_br
- .Height = Y_hö
- .Left = Lottoschein.Lbox1.Left + Lottoschein.Lbox1.Width * (A - 1) + Rand_Links_L + (abstand + .Width) * Spalte
- .Top = Lottoschein.Lbox1.Top + Lottoschein.Lbox1.Height * (B - 1) + Rand_oben_L + (abstand + .Height) * Zeile
- .Tag = I
- .Text = I
- .Show()
- End With
- Next : Next : Next
- End Sub
und folgenden Code um auf das Click-Ereigniss zu reagieren
Wie man sieht ist es ja ein Zweidimensionales Steuerelemente-Feld, was sich an anderen Steuerelementen ausrichtet. (Group-Box)
Meine Frage ist:
Wie bekomme ich im Click-Ereigniss gesagt, welches Steuerelement ich gerade geklickt habe, ohne mir das über die Tag-Eigenschaft mitzuteilen oder alle Labels "Bist du der Richtige" zu fragen.
Gibt es irgendeine Funktion oder Eigenschaft, die mir die zwei Indexe liefert?
Grüße