Scrivi un'unica procedura di gestione eventi che gestisca gli eventi di tutte e 16 le picturebox in questo modo:
codice:
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