Для решения подобных задач – запуска или закрытия приложений/форм/отчетов можно воспользоваться мастером построения командного кода:
В первом окне мастера, в разделе Categories указывается Application (=работа с приложением; для оперирования с формами, указывается Form Operations, для оперирования с отчетами – Report Operations).
В следующем окне, в левой части (Actions) указывается Quit Application.
В следующем окне задаётся текст кнопки (или картинка).
В следующем окне название кнопки (например Stop_App).
Также решить задачу можно написанием кода на событие Click кнопки:
Private Sub StopApp_Click()
On Error GoTo Err 'элементарная обработка ошибки
'команда выхода из приложения
DoCmd.Quit
Exit Sub
'командная строка перейдет к Err в случае если возникла ошибка
Err:
Msgbox Err.Description
'или Msgbox Error$
Exit Sub
End Sub
Скачать пример в zip: StopButton.zip
Скачать пример в mdb: StopButton.mdb
См. также: Элементарная обработка ошибок On Error Goto Err