🚀 go-pugleaf

Hallo,

Ik ben nog niet zo lang bezig met VB en zit vast.
Ik heb 2 data waarvan ik het verschil wil kennen. Het lukt me om het
verschil te krijgen in ofwel dagen ofwel uren, minuten enz....
Ik heb daar een timer opgestoken zodat ik de de tijd (nu ingesteld op
seconden) zie wegtikken .
Wat ik zou willen is het verschil in dagen, uren, minuten en seconden zoals
vb.:
"Het verschil tussen de 2 data is  x dagen, x uren, x minuten en x
seconden."
Ik heb al van alles geprobeerd met de functie "FORMAT" toe te passen op de
variabele die het verschil geeft tussen de 2 data maar ik krijg er niks
deftigs uit.
Ik heb dan geprobeerd met "DatePart" maar daar krijg ik ook of enkel dagen,
of uren of minuten enz...
Als ik die DatePart verschillende keren toepas kan ik wel de dagen, uren,
minuten enz.. naast elkaar krijgen maar de berekening klopt niet ik krijg
vb. 1 dag, 24 uur, 1440 minuten.......
Ik zal de code die ik tot nu toe heb hier onder kopie�ren, hopelijk kan
iemand mij verder helpen.

Private Sub cmdBerekenen_Click()
    Dim dtHuidigeDatum             As Date
    Dim dtDoelDatum                 As Date
    Dim lngVerschilInSeconden   As Long

    txtNu = Now
    dtHuidigeDatum = txtNu
    dtDoelDatum = txtDoelDatum

    lngVerschilInSeconden = DateDiff("s", dtHuidigeDatum, dtDoelDatum)


    txtResultaat = "Nog " & lngVerschilInSeconden & " seconden eer de
volgende datum bereikt is."

End Sub


TIA

--
moorii