salve a tutti
essendo che ho un progetto che usa i report di access, dovrei renderli piu dinamici, infatti sto pensando di modificare le query dal mio programma vb.net
attualmente questa routine riesce a modificare la query ma la schermata di access rimane visibile a video e solo con task manager si riesce a chiudere.
sapete come posso rilasciare le risorse?
grazie

codice:
  Public Sub StampaAccess(NomeFileDisco As String, strsql As String, NomeReportAcc As String, NomeQuery As String)
     
        Dim StrPercorsoDb As String
        StrPercorsoDb = PathDB ' Application.StartupPath & "\Magazzino.accdb" ' reg.GetValue("dbq")


        Dim oAccess As Access.Application
        oAccess = New Access.Application
        Dim sDBPath As String 'path to DB 


        sDBPath = StrPercorsoDb


        oAccess.OpenCurrentDatabase(filepath:=sDBPath, Exclusive:=False, bstrPassword:=PassDb)
        oAccess.DoCmd.Minimize()
        oAccess.Visible = False


        Try            
                oAccess.DoCmd.DeleteObject(Access.AcObjectType.acQuery, NomeQuery)
               oAccess.CurrentDb.CreateQueryDef(NomeQuery, strsql)


        Catch ex As Exception
            MsgBox(ex.ToString)
        Finally


            oAccess.Quit()
            oAccess = Nothing
        End Try
end sub