If Me.Dirty = True Then
If MsgBox("Değişiklik Kaydedilsin Mi.", vbCritical + vbYesNo) = vbNo Then
Me.Undo
End If
End If
Alt formun güncelleştirme öncesinde olayına aşağıdaki kodu ekleyiniz.