il problema è semplicemente che non inizializzi la variabile object, hai provato a controllare passo passo se viene eseguita la riga:

codice:
Case "1.0" : Prev = New Preventivo1_0(totitems) 'crea un oggetto di tipo preventivo
perchè se questa non viene eseguita hai la NullReferenceException.