动态设定powerpoint放映内容

《动态设定powerpoint放映内容》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、利用Application对象事件实现动态设定演示文稿放映内容陈思敏广东教育学院【摘要】PowerPoint通过Application对象提供了作用于演示文稿、幻灯片和演示文稿窗口等非控件的对象的事件。但是对这些事件的编程与对其他标准控件的事件的编程不同，必须要先在类模块里用WithEvents关键字申明一个Application对象，并在另一个标准模块的初始化例程里实例化该类模块和Application对象，然后才能实现对Application对象的事件的编程。可以利用Application对象的幻灯片放映事件来实现在PowerPoint放映时动态设定放映内容。【关键词】Pow

2、erPoint，Application对象，事件，演示文稿，动态设定，放映【中图分类号】TP317.1SettingPowerPoint’sPlayingContentsDynamicallythroughApplyingEventsofApplicationObjectSiminChenGuangdongInstituteofEducation【Abstract】PowerPointhasprovidedeventsforsuchnon-controlobjectsaspresentations,slidesandwindows.However,programmingonthe

3、seeventsisquitedifferentfromprogrammingonthestandardcontrols:programmingontheeventsofapplicationobjectscannotbeconducteduntilanapplicationobjecthasbeendeclaredwiththekeywordWithEventsinaclassmoduleandthisclassmoduleaswellasitsapplicationobjecthasbeenreferencedintheinitializationroutineinastan

4、dardmodule.Settingtheplayingcontentsdynamicallywhenthepresentationisbeingplayedcanbeimplementedthroughapplyingtheplayingeventsoftheapplicationobject.【KeyWords】PowerPoint,ApplicationObjects,Events,Presentation,SettingDynamically,Playing一、引言开发过MicrosoftOffice解决方案的工程师们都知道，Word解决方案中除了可以给标准控件的事件编程

5、之外，还可以给文档对象Document的三个事件编程：New、Open和Close，以便完成初始化或结束设置等工作。给Document对象的事件编程可以直接在给其他控件编程的代码窗口里完成，因为在这个窗口里可以找到Document对象。然而，在开发PowerPoint解决方案时，在给控件编程的代码窗口里却没有PowerPoint演示文稿对象Presentation，也没有幻灯片对象Slide，因此无法象Word解决方案那样直接给这些非控件对象编程，也就无法控制这些对象被操作时的动作，例如，采用时间控制的方式放映幻灯片时动态设定幻灯片的内容等。事实上PowerPoint提供了这些非

6、控件对象的事件，只是对这些事件的编程与对普通控件的事件的编程方法不一样。本文将深入探讨在PowerPoint解决方案中对这些非控件对象的事件的编程方法，以及对这些事件的典型的应用例子。二、PowerPoint的Application对象的事件PowerPoint提供了三种非控件对象的事件，这三种非控件对象是演示文稿对象Presentation，幻灯片对象Slide，以及窗口对象Window。但是，虽然事件是针对这三种对象的，但从编程方法上来说，所有这些事件都属于Application（应用程序）对象的事件。根据事件发生的场合，这些事件可以分为两大类：在编辑幻灯片时发生的事件和在放

7、映幻灯片时发生的事件。下表列出MicrosoftOfficePowerPoint2003所提供的这类事件：事件发生场合事件解释编辑幻灯片AfterNewPresentation新演示文稿被创建后此事件发生AfterPresentationOpen演示文稿被打开后此事件发生ColorSchemeChanged幻灯片设计模板更改后此事件发生NewPresentation新演示被创建后此事件发生PresentationBeforeSave保存演示文稿前此事件发生Presentation