返回一个 AnimationSettings 对象，该对象代表可应用于指定形状的所有特殊效果。
expression.AnimationSettings
expression 必选。该表达式返回“应用于”列表中的对象之一。
本示例设置在创建幻灯片时，当前演示文稿第二张幻灯片的第一个形状从左侧飞入。
With ActivePresentation.Slides(2).Shapes(1).AnimationSettings
.EntryEffect = ppEffectFlyFromLeft
.TextLevelEffect = ppAnimateByAllLevels
End With