[VB6] Differenza date

[Luciano79]

 Dim Data1 as Date
 Dim Data2 as Date
 Dim Differenza as Long

 Data1 = Now()
 Data2 = "13/09/04"
 Differenza = DateDiff("d", Data1, Data2) '"d" sta per "day". Ris=4

Non è necessario che le date siano scritte nello stesso formato,
il compilatore le interpreta da se.