'To review the constants used here, review 'the Access Basic online help for MsgBox. If MsgBox("Are you sure?", 4 + 256 + 32) = 7 Then 'Prepare to exit procedure. Exit Sub End If