680 Aufrufe
Gefragt in Datenbanken von
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

1 Antwort

0 Punkte
Beantwortet von
Hallo Opa,

Füge der einfachheithalber im Formularkopf des Formulares ein ungebundenes Textfeld ein und gib in der Entwurfsansicht unter Steuerelementinhalt

=Datum()

ein.

Gruß
Paul1

Access 2003
...