【发布时间】:2020-07-09 15:10:38
【问题描述】:
您好,我在 Ms-Access 的文本框中以“yyyy/mm/dd”格式获取日期
检查输入用户的验证输入日期,我在 LostFocus DateCutting TextBox 中的代码:
On Local Error GoTo Baddates
myDate = DateCutting.Text
TextBox1.Text = FormatDateTime(myDate, "yyyy/mm/dd")
Baddates:
MsgBox "Please Insert Correct Date! "
例如,我想阻止在月份输入 15,但我收到消息“请输入正确的日期!”总是那么专注于下一个对象。
【问题讨论】:
-
你需要一个
exit sub,否则msgbox总是会触发。 -
控件是否绑定到日期字段?如果是,只需将
Format属性(属性窗口)设置为“yyyy/mm/dd”(不带引号)。控件本身不允许无效日期。 -
不,它只是一个获取日期的文本框