Question : Valider les champs de mois et d'année basés sur la date du jour

J'ai une table d'accès qui a un champ d'année et un champ de mois. Le champ d'année est juste une boîte des textes et j'ai une règle de validation réglée <=Year (date ()) de sorte que l'utilisateur ne puisse écrire rien à l'avenir. Le champ de mois est une boîte drop-down sur la forme avec janvier par décembre comme options. Je veux ajouter une règle de validation sur la forme qui ne laissera pas l'utilisateur choisissent tout mois à l'avenir basé sur la valeur de champ d'année. Par exemple, le champ d'année a 2010 en tant que sa valeur, ainsi l'utilisateur ne devrait pas pouvoir choisir n'importe quoi autre que janvier par juillet dans le domaine de mois parce que la date d'aujourd'hui est 7/22/2010. class= de

Réponse : Valider les champs de mois et d'année basés sur la date du jour

txtMonth_beforeupdate secondaire privé (annulation comme nombre entier)
si me.txt Year=year (date ()) puis
   si mois de me.txt Month> (date ()) puis
      msgbox « vous ne pouvez pas employer de futures dates »
      me.txt Month.setfocus
      cancel=true
      sortir le sous-marin
  finir si
finir si

finir le sous-marin