dim varclasse as new nomeclasse()