如何列出所有的数据库和用户名,有这样的一条语句吗?

如何列出所有的数据库和用户名,有这样的一条语句吗?
---------------------------------------------------------------

一条语句吗?简单:-)

exec sp_MSforeachdb N'use [?]select dbname=db_name(),username=user_name()'