Hallo Alle
Ich habe nachfolgende Code bei Formular öffnen eingegeben und es funktioniert
alles.
Nun möchte ich aber in der letzten Anweisung noch etwas anfügen und zwar.
Or Me!Ende <= Date()
Feld Ende im Kopf des Formulars, Date() soll heutiges Datum sein.
Diese Anweisung funktioniert aber nicht
If Me.Gesperrt = True Then
Me.AllowAdditions = False
Me.AllowEdits = False
Me.AllowDeletions = False
Else
Me.AllowAdditions = True
Me.AllowEdits = True
Me.AllowDeletions = True
End If
Me!TxtAbgeschl.Visible = Me!Gesperrt = True
Me!Gym.Visible = Me!Gesperrt = False
Me!KBAbschluss.Visible = Me!Gesperrt = False Or Me!Ende <= Date()
Könnte mir bitte wer helfen??
Danke im Voraus