设置或返回 MsoTriState 类型常数,该常数代表动画启动时是否应该加速。可读写。
| MsoTriState 可以是下列 MsoTriState 类型常数之一。 | 
| msoCTrue 不应用于此属性。 | 
| msoFalse 默认值。动画启动时不加速。 | 
| msoTriStateMixed 不应用于此属性。 | 
| msoTriStateToggle 不应用于此属性。 | 
| msoTrue 动画启动时加速。 | 
expression.SmoothStart
expression 必选。该表达式返回“应用于”列表中的对象之一。
以下示例向幻灯片添加一个形状并使该形状具有动画效果,然后指示该形状在动画启动时加速。
Sub AddShapeSetTiming()
    Dim effDiamond As Effect
    Dim shpRectangle As Shape
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)
    Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpRectangle, effectId:=msoAnimEffectPathDiamond)
    With effDiamond.Timing
        .Duration = 5
        .SmoothStart = msoTrue
    End With
End Sub