本示例显示了活动幻灯片的创建者的消息。

Set myObject = ActivePresentation
MsgBox myObject.Creator