Ho due fate
quella odierna

DataOdierna = format(date, "yyyymmdd")


e quella di scadenza

DataScadenza = "20021219"

Mi occore estrarre in una variabile la differenza tra le due date:

DiffDate as Integer
DiffDate = 10

Sapete aiutarmi?