[VB6] Hoe wat bij tijd optellen/aftrekken?

[StephanL]

Ik weet nu hoe ik de tijd kan bewerken in VB en laten zien ook nog maar hoe kan je bij die tijd bijv 6 uur optellen?

[stylee]

Deze is wel errug rtfm..

check de help-functie over Now en gerelateerde functies als Day, Year, Hour etc

[Verwijderd]

dim dtNewTime as Date
dtNewTime = DateAdd("h", 6, dtOudeTijd)

[StephanL]

Jaja gaat het effe knutselen

[Verwijderd]

En voor je dadelijk gaat vragen hoe je moet aftrekken (uhum, wat zeg ik nou..:)), dat gaat met dezelfde functie, maar dan een negatieve waarde als argument. Weet uit eigen ervaring dat je daar nog wel eens lang naar kunt zoeken, maar dat kan ook aan mij liggen.

Joost

[Verwijderd]

En als je "dagen" wilt gaan vergelijken, dan moet je gewoon de tijd op nul zetten. In VB is dat irritant maar het kan met:

code:

dtDagDatum=DateSerial(Year(dtDatum),Month(dtDatum),Day(dtDatum))

en dan is dtDag1=dtDag2 gemakkelijk. Als je datum en tijd in een variabele wilt zetten dan doe je dat zo:

code:

dtDatum=DateSerial(...)+TimeSerial(...)

Die VB manual is niet al te duidelijk wat dat betreft.