SANDIKSORGUEKRANI isimli formun kapandığında olayına aşağıdaki kodu yazınız..

Private Sub Form_Close()

   Dim strSQL As String

   Dim db As Database

   Set db = CurrentDb

        DoCmd.SetWarnings False

            strSQL = "DELETE * FROM SANDIK;"

            db.Execute strSQL

        DoCmd.SetWarnings True

        Set db = Nothing

End Sub