求对窗体文本框内时间进行限制

ynjxw · 发表于 2006-10-5 17:30:00

我的窗体上有一文本框，我想让它显示现在的时间，但是如果现在的时间超出我所设定的范围，如：< 2006-10-5 8：00：00,就显示错误，并且不能保存输入的数据，请问做段代码改怎么写。

一点通 · 发表于 2006-10-5 18:56:00

你这个时间范围是动态还是固定的?

ynjxw · 发表于 2006-10-5 19:44:00

是固定的，如：< 2006-10-5 8：00：00，就是如果是在2006-10-5 8：00：00以后输入数据就提示错误，也就是在2006-10-5 8：00：00以后就不可以输入数据，如果要输入就必须重新设定时间范围

andymark · 发表于 2006-10-5 20:01:00

If Now() > #10/5/2006 8:00:00 AM# Then

Me.Text0.Enabled = False
MsgBox "超过规定时间，不能录入!!!"
Else
Me.Text0 = Now()
End If

ynjxw · 发表于 2006-10-5 21:37:00

好像还是不行，我上传一个小例子，请大家帮助我改一下

[此贴子已经被作者于2006-10-5 13:37:24编辑过]

andymark · 发表于 2006-10-5 22:01:00

Private Sub Command8_Click()

DoCmd.GoToRecord , , acNewRec

If Now() > #10/5/2006 8:00:00 AM# Then
Me.编号.Enabled = False
Me.地址.Enabled = False
Me.录入时间.Enabled = False
Me.姓名.Enabled = False
Me.地址.Enabled = False
MsgBox "超过规定时间，不能录入!!!"
Else
Me.录入时间 = Now()
End If

End Sub

jingyun9999 · 发表于 2006-10-8 04:52:00

okokok

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] 求对窗体文本框内时间进行限制

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)