dentro nel ciclo for devi inserire un'istruzione AddHandler...

in questo modo

codice:
AddHandler controllo.evento, AddressOf Sub da richiamare passargli senza passargli argomenti