我有两个子表单,每个子表单代表数据库中的一个表。这些子表单显示这些表中的所有记录,并且它们之间具有一对多的关系。
当在父子表单中删除一条记录时,它会删除另一个子表单中的所有子表单(我打开了级联删除)。
删除完成后我需要在子表单中进行一些处理。我想使用 AfterDelConfirm 事件,但我无法让它触发。
我什至没有获得确认删除的选项(在父表单中)。事实上我是手动完成的:
Private Sub Form_Delete(Cancel As Integer)
Dim PhaseID As Long
Dim Response As Long
Dim style As Long
style = vbYesNo + vbQuestion
Response = MsgBox("Are you sure you wish to delete this phase and all related scenarios and nodes?", style)
If Response = vbNo Then
Cancel = True
End If
End Sub
尝试让它运行:
Private Sub Form_AfterDelConfirm(Status As Integer)
Debug.Print "trigger plz"
End Sub
有什么方法可以让这个事件按照我设置的方式触发吗?
大概是这样的设置: Form.AfterDelConfirm 事件(访问)
注意
不会发生 AfterDelConfirm 事件和删除确认对话框 如果清除下面的“记录更改”复选框,则不会显示该框 在“访问选项”对话框的“编辑”选项卡上确认。