SELECT tbAbbonamento.[IDUnico], tbAbbonamento.[IDCorso], tbAbbonamento.[IDAbbonamento], tbAbbonamento.[Scadenza]
FROM tbAbbonamento
WHERE (((tbAbbonamento.[IDUnico]) In (SELECT [IDUnico] FROM [tbAbbonamento] As Tmp GROUP BY [IDUnico],[IDCorso] HAVING Count(*)>1 And [IDCorso] = [tbAbbonamento].[IDCorso])))
ORDER BY tbAbbonamento.[IDUnico], tbAbbonamento.[IDCorso];