表中日期的限制设置

赵玥琦　发表于：2018-11-22 08:19:00 　

在表的设计中，为防错，希望日期的录入不能超过今天，可在有效性规则中设置“<=Date()”，请问限制为登录日期为今年且不超过今天如何做。谢谢

伊西军发表于：2018-11-22 08:33:25

应该是不可以，建议在窗体中通过vba代码对录入的数据进行限制

赵玥琦发表于：2018-11-22 11:19:54

请高手给个代码吧

麒麟山人发表于：2018-11-27 10:21:15

>=DateSerial(Year(Date()),1,1) And <=Date()

西出阳关无故人发表于：2018-11-27 16:42:33

Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me.日期 > Date Then
MsgBox "日期错误"
Cancel = True
End If
End Sub

赵玥琦发表于：2018-11-29 16:32:52

在表中测试成功，错误则强制更改，否则无法进行下一步操作。谢谢谢谢！

总记录：5篇页次：1/1 9 1 :

Access交流中心