本示例显示当前演示文稿的路径。
MsgBox ActivePresentation.Path