通过

Application.SlideShowNextBuild 事件 (PowerPoint)

  • 项目

在单击鼠标时或计时动画，但在动画的对象变得可见之前发生。 .

语法

expression。 SlideShowNextBuild (Wn)

expression：表示 Application 对象的变量。

参数

名称 必需/可选 数据类型 说明
Wn 必需 SlideShowWindow 活动幻灯片放映窗口。

备注

有关使用 Application 对象的事件的信息，请参阅操作方法：使用 Application 对象事件。

示例

如果第一张幻灯片上的当前形状是电影，本示例将播放影片持续直到手动停止演示者。 此代码是用于与第二个 SlideShowNextSlide 事件示例而设计的。

Private Sub App_SlideShowNextBuild(ByVal Wn As SlideShowWindow)

    If EvtCounter <> 0 Then

        With ActivePresentation.Slides(1) _
                .Shapes(shpAnimArray(2, EvtCounter))

            If .Type =msoMedia Then

                If .MediaType = ppMediaTypeMovie

                    .AnimationSettings.PlaySettings _
                        .LoopUntilStopped

                End If

            End If

        End With

    End If

	EvtCounter = EvtCounter + 1

End Sub

另请参阅

Application 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。