Sluiten formulier en huidig record verwijderen

[Skyboy]

Wanneer een gebruiker het formulier verwijdert, dan krijgt hij een messagebox met ja of nee.
Indien nee, keert men terug naar huidig record
Indien ja, dan zou het huidige record verwijderd moeten worden.

NogLegeVelden: 
    Msg = "Niet alle gegevens werden ingevoerd ! " & Chr(13) & _ 
    "Ben u zeker dat u wilt afsluiten ?" & Chr(13) & "(reeds ingevulde gegevens gaan dan VERLOREN !)" 
    Style = vbYesNo + vbCritical + vbDefaultButton2 
    Title = "TITEL" 
    Antwoord = MsgBox(Msg, Style, Title) 
    If Antwoord = vbYes Then 
        'DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 
        'DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 
        DoCmd.RunCommand acCmdDeleteRecord 
        DoCmd.Close 
        Exit Function 
    Else 
        Exit Function 
End If

Nu krijg ik hierop een error :

De opdracht of actie Recordverwijderen is momenteel niet beschikbaar.

Maar het huidige (niet volledige record) zou moeten verwijderd worden!!!

Kan mij hier soms iemand bij helpen?

Alvast bedankt

Grtz
Fantjes