[VB6] Differenza date

[goku370]

Come posso trovare il numero di giorni che intercorre tra un data e un'altra.

Ad esempio, 09/09 a 12/09 passano 3 giorni
oppure da l 30/09 al 02/10 passano 2 giorni.


Sapete darmi un consiglio?

[Luciano79]

Lo so col .NET, ma mi ricordo che c'era anche in VB6, si chiama sicuramente DareDiff, ma non mi ricordo se richiede gli stessi parametri.

 TempoTrascorso = DateDiff (UnitaDiMisura, PrimaData, SecondaData).

[Luciano79]

pardon... "DateDiff"

[goku370]

Credo sia quello che cerco. Ma qual'è la sintassi corretta per usare il comando?

[saraX]

dal 30/09 al 02/10 passano:

DateDiff("d", "30/09", "02/10")

dove d=Day e può essere sostituito anche con i valori:

yyyy Year
q Quarter
m Month
y Day of year
w Weekday
ww Week of year
h Hour
n Minute
s Second

ciao,
Sara.

[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.