Che intendi dire con retrocompatibilità?
Cmq così funzica:
diffgiorni = DateDiff(DateInterval.Day, CDate("01/01/03"), CDate("10/01/03"))