Office中国论坛/Access中国论坛

标题: 求助:开始时间小于录入时间时自动提醒功能 [打印本页]

---

作者: 明月    时间: 2008-12-8 18:27
标题: 求助:开始时间小于录入时间时自动提醒功能
file:///C:/Documents%20and%20Settings/Administrator/My%20Documents/图形1.jpg"开始时间"和"录入时间"是二个时间的格式的字段,要求是当"开始时间"小于"录入时间"时,数据库自动提醒,然后给出二个选项,"是"和"否",如果选择"是"就保存,如果选择"否"就放弃.
上述的设置要在窗体中完成,而不能在"表"中完成.
请高手予以指导.

[ 本帖最后由 明月 于 2008-12-8 18:32 编辑 ]

---

作者: Henry D. Sy    时间: 2008-12-8 19:24

1. Private Sub Form_BeforeUpdate(Cancel As Integer)
   
2.     If Me.开始时间 < Me.录入日期 Then
   
3.         If MsgBox("开始时间太小了,继续保存吗？", vbYesNo) = vbNo Then
   
4.             Cancel = True
   
5.             Me.Undo
   
6.         End If
   
7.     End If
   
8. End Sub

复制代码

---

作者: 明月    时间: 2008-12-9 20:23
谢谢版主

---

作者: boy1dl    时间: 2008-12-10 08:35
标题: aeswtwyretuh
wertwwertyery

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3