usa la funzione DateAdd
la trovi sull'Help di VB