2012-09-20 84 views

回答

1

從您提供的鏈接:

Private Sub ShockwaveFlash1_FSCommand(ByVa­l command As String, ByVal args As String) 
With SlideShowWindows(1).View 
.Next 
End With 
End Sub 

修改成:

Private Sub ShockwaveFlash1_FSCommand(ByVa­l command As String, ByVal args As String) 
With SlideShowWindows(1).View 
    .GoToSlide(lSlideIndex) 
End With 
End Sub 

lSlideIndex是演示文稿中的幻燈片的長=序號。即如果你想去第42張幻燈片,.GoToSlide(42)

相關問題