access und VBA (MessageBox)

Also wenn du es über einen Extrabutton schliessen willst, geht es folgendermaßen:

Private Sub Command1_Click()
Ende = Inputbox ("Wollen Sie das Programm beenden(ja / nein)?")
IF Ende = "ja" then unload me else MsgBox "Bitte geben sie ja oder nein ein!"
End Sub

So sollte es eigentlich gehen sagen mir meine grauen Zellen. Desweiteren wähle doch bitte eine präzisere Betreffzeile, denn wichtig ist bei uns so oder so alles Mit Klick auf Edit kannst du sie bearbeiten.

Gruß
Markus

Edit: Das entspricht nicht hunderprozentig deiner Aufgabenstellung da durch die Funktion Unload Me nur die Prozedur bzw. der entsprechende Programmablauf beendet wird, um Access per Knopfdruck zu schliessen ist sicherlich ein anderer Begriff notwendig.