accessを自動的に閉じる

http://www.tsware.jp/tips/tips_095.htm

こちらのページを参考にさせてもらった。
フォームのみならずファイルごと閉じたいので

Private Sub Form_Timer()
DoCmd.quit
End Sub

としている。