select distinct a.name,a.xtype from sysobjects a,syscomments b where a.id=b.id and b.text like ‘%所需检索的关键字%’ ORDER BY a.xtype desc