Office中国论坛/Access中国论坛

标题: 怎样让表格式窗体内记录不因为焦点移动而自动保存？ [打印本页]

作者: bjcompass 时间: 2012-6-4 08:03
标题: 怎样让表格式窗体内记录不因为焦点移动而自动保存？
编辑表格式窗体内记录，有时尚未完成，因为焦点移动到其他记录而自动保存了。以前我都是用非绑定控件输入数据，点击每条记录后的“保存”键再输入到绑定控件。如果控件数量多窗体非常零乱。请问还有其它更简单的办法吗。

作者: Henry D. Sy 时间: 2012-6-4 09:39
不要绑定表

作者: xie62 时间: 2012-6-5 14:23
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strMsg As String
strMsg = "数据已经改变."
strMsg = strMsg & vbCr & "你想保存吗?"
strMsg = strMsg & vbCr & "点击[是]保存，点击[否]放弃保存。"
If MsgBox(strMsg, vbQuestion + vbYesNo, "记录保存吗?") = vbYes Then
      ' 什么也不需要做，就会保存记录
Else
      DoCmd.RunCommand acCmdUndo

         End If
End Sub

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