Access'in kendi sağ üst köşedeki kapat butonunu devre dışı bırakıyorum. Program içindeki formların sağ üst köşesindeki kapat butonlarını devre dışı bırakıyorum. Bir buton ekleyip ona tıklandığında aşağıdaki kontrolü yaptırıyorum:

If Me.Dirty Then

        If MsgBox("Formda kaydedilmemiş bilgiler var. Eğer çıkmak isterseniz bilgiler geri getirilemeyecek şekilde silinecek. Çıkmak istediğinizden emin misiniz?", vbQuestion + vbYesNo, "Çıkış Öncesi Uyarı!!!") = vbYes Then

            Me.Undo

            DoCmd.Close

        Else

            Exit Sub

        End If

    Else

        DoCmd.Close

    End If