Datumkiezer

Status
Niet open voor verdere reacties.
V

Vlieghe

Gebruiker
Lid geworden
5 aug 2017
Berichten
7
Om een access formulier heb ik twee tekstvakken staan voor datums
De ene heeft als naam START en het andere EINDE

Nu zou ik graag hebben als er een datum gekozen wordt bij START door middel van de datumkiezer, dat wanneer men naar het tekstvak EINDE gaat de datumkiezer naar dezelfde maand gaat als de maand die er gekozen is in het tekstvak START.

Knipsel.PNG
 
Ik snap niet helemaal wat je bedoelt. Een datumkiezer laat een datum zien m.b.v. een maandkalender. Dat betekent, dat je, als je in het eerste tekstvak een datum kiest, dus wel die datum mee kan nemen naar het tweede tekstvak, maar niet de maand. Zonder datum kan de datumkiezer geen maand laten zien.
 
Ik bedoelde, wanneer men een datum heeft geselecteerd als begin, de einddatum start op de datum van het begin.
M.a.w. iemand kiest als begindatum 16/05/2019 en hij gaat dan naar de datumkiezer van het tekstvak EINDE, dat daar gestart wordt met 16/05/2019 en niet met de huidige datum van vandaag.
 
Ik heb wat lopen stoeien met wat eigen veldjes, maar het idee is hetzelfde.

Code: 
Private Sub StartDatum_GotFocus()
    RunCommand acCmdShowDatePicker
    If Me.Dirty Then Me.Dirty = False
End Sub

Code: 
Private Sub StartDatum_AfterUpdate()
    Me.EindDatum = CDate(Me.StartDatum) + Time
End Sub

Code: 
Private Sub EindDatum_GotFocus()
    RunCommand acCmdShowDatePicker
    If Me.Dirty Then Me.Dirty = False
End Sub
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan