Toon posts:

[VB Access2k] Jaren erbij tellen

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik heb een probleem wat waarschijnlijk niet al te moeilijk op te lossen is, maar toch kom ik er niet uit.

Stel dat de begindatum 01-01-01 is, hoe kan ik dan 3 jaar vooruit tellen, zodat de uitkomst in een ander veld terecht komt?

Hoop dat het duidelijk is...

bvd

  • LauPro
  • Registratie: Augustus 2001
  • Laatst online: 05-09 11:09

LauPro

Prof Mierenneuke®

Daar is de functie Year voor. Dus zoiets:
code:
1
2
3
4
Dim dBeginDatum as Date
Dim dEindDatum  as Date

dEindDatum = Month(dBegindatum) & "-" & Day(dBegindatum) & "-" & (Year(dBegindatum) + 3)

De reden dat ik eerst de maand doe en dan dag is omdat in het Engels zo is, als je weer datum pakt met het Nederlandse formaat wordt het, als het goed is, weer omgezet.

Inkoopacties - HENK terug! - Megabit
It is a war here, so be a general!


  • baskabas
  • Registratie: December 2000
  • Laatst online: 05-04 12:26
Of
code:
1
Variabele = DateAdd("yy",+3,[Datum])

:)

  • Sjnirk
  • Registratie: Maart 2001
  • Laatst online: 27-03-2025

Sjnirk

Hie vrieve

Dacht laat ik mijn vba-kennis weer es zien ben ik alweer te laat :'(

Bikkelen gebeurt pas na 2:00