全部显示

BeginBatchEdit 事件

       

在窗体被激活,或最后一次批事务处理提交后,在首次更改(支持批更新的)窗体上的数据后,该事件发生。

Private Sub Form_BeginBatchEdit(Cancel As Integer)

Cancel   将该参数设为 True 会取消未决的更改,并因此取消批更新,因为不再有任何未决的更改。

说明

该事件应用于其“批更新”属性设为“是”的 Access 项目窗体。

该事件类似于 Dirty 事件,但适用于整批记录,而不是单个记录。BeginBatchEdit 事件在窗体和控件的对应 OnDirty 事件发生之前发生。

在子窗体上编辑记录不会触发主窗体的该事件。

示例

下面的示例显示了捕获 BeginBatchEdit 事件的子例程的语法。

Private Sub Form_BeginBatchEdit(Cancel As Integer)
    Dim intResponse As Integer
    Dim strPrompt As String

    strPrompt = "Batch update about to begin. " _
        & "Do you wish to continue?"

    intResponse = MsgBox(strPrompt, vbYesNo)

    If intResponse = vbNo Then
        Cancel = True
    Else
        Cancel = False
    End If
End Sub