如何禁止自动保存

simple　发表于：2012-01-08 20:29:30 　

除了t小雨老师的那个办法之外还有其他方法吗？

比如不提示在点退出按钮或者窗体右上角的叉也能不自动保存吗？

网行者发表于：2012-01-08 20:38:55

Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim q As Integer
q = MsgBox("是否保存当前记录", vbOKCancel, "保存当前记录")
If q <> 1 Then
Me.Undo
End If
End Sub

simple 发表于：2012-01-08 21:10:27

你这个和t小雨的差不多

Private Sub Form_BeforeUpdate(Cancel As Integer)
      If MsgBox("数据被更改,是否保存?", vbYesNo) = vbNo Then
         Cancel = True
      End If
End Sub

我想要没有提示的

蟹仔发表于：2012-01-09 17:23:41

如要达到这种效果，最好使用无记录源的窗体，把数据显示在子窗体。再在窗体里建立相应的未绑定的控件，只有点击了保存，才能把记录导入。这样做的好处有很多，一来禁用了鼠标滚轮，二来无论修改记录还是记录跳转还是保存记录，都可以写复杂的代码进行控制。

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

Access交流中心