Frage : Die Monats- und Jahrfelder validieren, die auf Tagesdatum basieren

Ich habe eine Zugangstabelle, die ein Jahrfeld und ein Monatsfeld hat. Das Jahrfeld ist gerade ein Textkasten und ich habe eine Gültigkeitserklärungrichtlinie eingestellt <=Year (Datum ()) damit der Benutzer nichts nicht zukünftig eintragen kann. Das Monatsfeld ist ein Drop-Down-Kasten auf der Form mit Januar durch Dezember als Wahlen. Ich möchte eine Gültigkeitserklärungrichtlinie auf der Form hinzufügen, die nicht den Benutzer vorwählen irgendeinen Monat lässt zukünftig, der auf dem Jahrfeldwert basiert. Z.B. hat das Jahrfeld 2010 als sein Wert, also sollte der Benutzer nicht in der Lage sein, nichts anders als Januar durch Juli im Monatsfeld vorzuwählen, weil heutiges Datum 7/22/2010 ist.

Antwort : Die Monats- und Jahrfelder validieren, die auf Tagesdatum basieren

privates VortxtMonth_beforeupdate (Löschen als ganze Zahl)
wenn me.txt Year=year (Datum ()) dann
   wenn Monat me.txt-Month> (Datum ()) dann
      msgbox „Sie können zukünftige Daten nicht benutzen“
      me.txt Month.setfocus
      cancel=true
      Unterseeboot herausnehmen
  beenden wenn
beenden wenn

Unterseeboot beenden