Access VBA教程:Undo事件

当用户取消对组合框控件、窗体或文本框控件的更改时,该事件发生。

Private Sub object_Undo(Cancel As Integer)

object   一个引用“应用于”列表中某种类型的对象的变量。

Cancel   将该参数设为 True,可以取消撤消操作,并将控件或窗体保留为编辑后的状态。

说明

只要用户通过单击命令栏上的“撤消字段/记录”按钮、单击“撤消”按钮、按 Esc,或调用指定控件的Undo方法,将控件返回其原状态,控件的 Undo事件就会发生。在所有这三种情况中,控件都必需有焦点。如果用户单击了命令栏上的“撤消键入”按钮,该事件不发生。

只要用户通过单击“撤消”按钮、按 Esc,或调用指定窗体上的 Undo方法,将窗体返回到原状态,窗体的 Undo事件就会发生。

VBA示例

下面的示例说明了捕获 Undo事件的子程序的语法。


Private Sub Form_Undo(Cancel As Integer)
    Dim intResponse As Integer
    Dim strPrompt As String
    strPrompt = "Cancel the undo operation?"
    intResponse = MsgBox(strPrompt, vbYesNo)
    If intResponse = vbYes Then
        Cancel = True
    Else
        Cancel = False
    End If
End Sub

上页:Access VBA教程:Timer事件 下页:Access VBA教程:UndoBatchEdit事件

Access VBA教程:Undo事件

Access VBA教程:UndoBatchEdit事件 Access VBA教程:Unload事件
Access VBA教程:Updated事件 Access VBA教程:ViewChange事件
Access VBA教程:Command函数 Access VBA教程:DAvg函数
Access VBA教程:DCount函数 Access VBA教程:DDE函数
Access VBA教程:DDEInitiate函数 Access VBA教程:DDERequest函数
Access VBA教程:DDESend函数 Access VBA教程:DFirst、DLast函数
Access VBA教程:不同字符串值的不同格式(Format函数) Access VBA教程:DLookup函数
Access VBA教程:DMin、DMax函数 Access VBA教程:DStDev、DStDevP函数
Access VBA教程:DSum函数 Access VBA教程:DVar、DVarP函数
Access VBA教程:EuroConvert函数 Access VBA教程:Eval函数
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号