girdiğiniz bir alanın kontrolü ile birlikte kullanın mesela adsoyad diye bir alanınız olsun diyelim ad soyad dolu ise ve kayıtta oynama yapılıyorsa uyarı gelir. boş ise sormaz işin üç kağıdı

Private Sub Form_Dirty(Cancel As Integer)

if not isnull(me.adsoyad) then 

 If vbNo = MsgBox("Düzenlensin mi", vbYesNo + vbDefaultButton2, "Düzenle") Then

 SendKeys "{ESC}", True

 SendKeys "{ESC}", True

 End If

end if

End Sub