Indeed there is:

SELECT [name] AS SSISPackageName

, CONVERT(XML, CONVERT(VARBINARY(MAX), packagedata)) AS SSISPackageXML

FROM msdb.dbo.sysdtspackages90

where CONVERT(VARCHAR(MAX), CONVERT(VARBINARY(MAX), packagedata)) LIKE '%ActiveX%' --'%sub main()%'

http://www.sqlservercentral.com/articles/Integration+Services+(SSIS)/70011/