aşağıdaki kodu "F_01_TeklifGiris" formunun AfterInsert olayına ekler misiniz?

Private Sub Form_AfterInsert()

KayitKontrol = MsgBox("Teklif eklensin mi?", vbOKCancel)

    If KayitKontrol = 1 Then Exit Sub

    If KayitKontrol = 2 Then DoCmd.RunCommand acCmdDeleteRecord

End Sub