求助

黄健　发表于：2011-12-14 15:07:41 　

这是我做的一个保修系统，我想添加一个控件，能够在窗体上对数据库进行更改时弹出提示“是否进行修改？”和“请保存”

请查看 10 个与本帖内容相关的技术文章或帖子列表，确认对您的问题的解答是否会是列表中的其中一个解答。

麥田发表于：2011-12-14 15:30:13

If MsgBox("此数据已编辑，是否保存？", vbQuestion + vbYesNo, "**管理信息系统") = vbNo Then
Me.Undo
End If

黄健发表于：2011-12-14 16:10:08

你好，能够说具体点儿吗？？我是初学者，不知道加在哪儿？？方便帮我弄一下吗？？

一过客发表于：2011-12-14 19:49:23

在窗体控件的“更新后事件”中写代码：

如

Private Sub 日期1_AfterUpdate()
If MsgBox("此数据已编辑，是否保存？", vbQuestion + vbYesNo, "**管理信息系统") = vbNo Then
Me.Undo
End If
End Sub
又如

Private Sub 记录_AfterUpdate()
    If 记录 = "已收" Or 记录 = "未收" And IsNull(费) Then
        MsgBox "费不能为空，请填写费金额"
    End If
End Sub

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

Access交流中心