Visualizza wikitesto di Individuare il numero d'indice di Controlli appartenenti al medesimo gruppo di Eventi senza servirsi di sue specifiche proprietà

Sovente, per individuare in una routine il Controllo, appartenente a un medesimo gruppo di Eventi, che ha sollevato l'Evento, si fa riferimento a una sua Proprietà, come ad esempio ".Name".
<BR>E' possibile anche ottenere quanto descritto nel titolo di questa pagina

Mostriamo un esempio pratico, nel quale sul ''Form'' sono presenti tre ''Button'', creati da codice e appartenenti a un medesimo gruppo di Eventi.
<BR>Cliccando su uno dei tre ''Button'', si vuole sapere il numero d'indice del ''Button'' ha sollevato l'Evento "_Click()".
 Public Sub Form_Open()
 
  Dim Tasti As Button
 
  For b As Byte = 1 To 3
    With Tasti = New Button(Me) As "Tasti"
      .X = 100 * b
      .Y = 100 * b
      .W = 60
      .H = 40
    End With
  Next 
 
 End
 
 
 Public Sub Tasti_Click()
 
  For b As Byte = 0 To Me.Children.Max
    If Me.Children[b] = Last Then Print b
  Next
 
 End