Quote Originariamente inviata da optime Visualizza il messaggio
Siii! Ce l'ho fatta!

codice:
sub prova(of t)(contenitore as panel)
                      dim contaCtrl as integer=0
                      ForEach c AsControlIn contenitore.Controls
                            IfTypeOf c Is t Then
                                  contaCtrl +=1
                            EndIf
                      Next
               endsub

e per richiamarla

codice:
prova(of miaTipologiaDiClasse)(mioContenitore)