title image


Smiley Re: Einfachste Gültigkeitsregel für Datum innerhalb eines Bereiches
Hallo,



Ins Feld in das, das Datum eingegeben wird Vor Aktualisierung

Folgende Ereignisprotzedur(Code-Generator) anlegen:









Private Sub name deines Textfeldes_BeforeUpdate(Cancel As Integer)

Dim Alter As Integer



Alter = DateDiff("yyyy", Me.[name deines Textfeldes], Date)



If Alter 100 Then



MsgBox "Eingabe ergab ein Alter kleiner 10 oder größer 100 Jahre"



Cancel = True



Else

End If



End Sub

Grüß aus Unterfranken
Dieter

Hilfreiche Links:
DONKARL
KNOWHOW.mdb
PS: Brauche meine Access, W2K-Server e-books (Kompendium usw.) nicht mehr bei Interesse Bitte per mail melden.



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: