<<< 返回 access911.net 编程静态资料库索引页

新手来看:傻瓜问题,如何使窗体在保存数据前提示?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2005-1-28  浏览人次:1716


专题地址:http://access911.net/fixhtm/72FAB31E16DCEFF3.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:新手来看:傻瓜问题,如何使窗体在保存数据前提示?

 


问题:

新手来看:傻瓜问题,如何使窗体在保存数据前提示?

 

回答:

在窗体更新前事件中编程即可。

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


注意 Cancel 参数的使用,如果根本不想使用 ACCESS 的自动保存功能并且也不想有提示,那么在 BeforeUpdate 事件中加一个判断,然后再调用 Cancel = True 就可以了。要保存用 Access 命令按钮向导生成的“记录保存”按钮即可。
比如:

'在窗体公共部分声明一个变量
Dim blnCanSave As Boolean


Private Sub Form_BeforeUpdate(Cancel As Integer)
On Error GoTo Form_BeforeUpdate_Err
    If blnCanSave = False Then
        C.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/72FAB31E16DCEFF3.htm

 


上一篇:用代码证明窗体在记录跳转时触发了多少个事件

下一篇:如何用代码链接带有密码的数据库中的表?链接加密数据库

2017年2月22日生成静态资料