Private Sub Komut0_Click()



DoCmd.Close acForm, Me.Name



End Sub

Kodu aşağıdaki gibi yazılabilir.

Private Sub Komut0_Click()

On Error GoTo ErrHandler_



DoCmd.Close acForm, Me.Name



ExitProc_:

Exit Sub



ErrHandler_:

Resume ExitProc_

Resume



End Sub

Ancak, kod içerisindeki hatayı bulmak ve bu hatayı düzeltmek daha doğru olacaktır.