[VB.NET]: Evento Click su controlli PictureBox

[benza]

Ciao,
qualcuno sa come si può intercettare l'evento Click del mouse su una griglia di 4x4 picturebox senza dover scrivere per ogni singolo oggetto l'evento click
picturebox1_click(...), picturebox2_click(...) eccetera eccetera?
Grazie

[alka]

Ho spostato la discussione all'interno del forum dedicato a Visual Basic (VBx, VBA, ...) e ai linguaggi per .NET Framework (VB.NET, C#, ...).

In futuro, poni in questo forum le domande relative a questi linguaggi.

Ciao!

[benza]

SCUSA!
Ero su programmazione e non ci avevo fatto caso

[icecube_HT]

Originariamente inviato da benza
Ciao,
qualcuno sa come si può intercettare l'evento Click del mouse su una griglia di 4x4 picturebox senza dover scrivere per ogni singolo oggetto l'evento click
picturebox1_click(...), picturebox2_click(...) eccetera eccetera?
Grazie

Devi creare una matrice di PictureBox, cosi':
- crei una prima PictureBox, e la chiami, poniamo: picB;
- ci clicchi sopra, selezionandola, poi fai COPIA;
- fai INCOLLA, il VB ti chiedera' se vuoi creare una matrice di controlli, rispondi SI';
- ripeti INCOLLA fino a raggiungere il numero di controlli desiderati, che automaticamente
avranno nome picB(1), picB(2), ecc....
- con doppio click su uno delle PB verra' creata come al solito l'intestazione della routine di evento picB_Click(index), che ovviamente sara' UNICA, e che in fase di esecuzione conterra' in index il numero di picB su cui l'utente ha fatto click.

Ciao !


P.S.: scusate, ho visto dopo che il post era relativo a .NET, in VB6 funziona cosi', non sono certo che sia identico in ambiente VB.NET...

[MItaly]

Scrivi un'unica procedura di gestione eventi che gestisca gli eventi di tutte e 16 le picturebox in questo modo:

Public Sub PBEventHandler(ByVal sender As Object, ByVal e As EventArgs) Handles PictureBox1.Click, PictureBox2.Click, PictureBox3.Click 'e così via
'Per ottenere un riferimento al controllo che ha generato l'evento effettua il cast di sender
'al tipo PictureBox:
Dim castedSender As PictureBox=DirectCast(sender,PictureBox)
'...
End Sub

[benza]

grazie a tutti
ora provo