Access VisualBasic Script

Private Sub Report_Close()
      DoCmd.Close acForm, "frmReportFilter", acSaveNo
End Sub