实例10 方法二：在PowerPoint内部获取PPT主题