Ciao yro

il DateDiff fa la differenza su due date. La tua variabile DR deve essere una variabile di tipo Date e la stringa "02/11/2006" devi trasformarla in data
codice:
DD = DateDiff("d", DateSerial(2006,11,2), DR)