Automatisch timestamp toevoegen of verwijderen

Status
Niet open voor verdere reacties.

dave34nl

Gebruiker
Lid geworden
19 mei 2002
Berichten
76
Hoi, dmv een selectievakje (klaar) geef ik aan of iets klaar is, op het moment dat ik die aanvink zet deze een timestamp in een veld (DatumKlaar), echter zou ik ook graag willen dat als ik het vinkje weghaal de timestamp ook verdwijnt, de code ziet er nu zo uit:

Private Sub Klaar_Click()
Me.DatumKlaar = Now()
End Sub

Iemand enig idee hoe ik dat voor elkaar kan krijgen ?

Groetjes,

Dave
 
Hoi Dave,

Ik vermoed dat je het volgende zoekt:

Code:
Private Sub Klaar_Click()

    If Me.Klaar = True Then
        Me.DatumKlaar = Now()
    Else
        Me.DatumKlaar = ""
    End If

End Sub

Ik hoop dat je hiermee bent geholpen.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan