请问如何用VB调用现有的PowerPoint文件并播放？在线等待~~~

Question

调用会了，不知如果让被调用的PowerPoint文件自动播放~~~
UP有分！

Answer 1

调用后好像用sendmessage发个消息就可以放了，这个消息是什么我不知道：）

Answer 2

把PowerPoint文件另存为.pps文件
然后shell就可以了
shell "c:\test.pps"

Answer 3

现在知道怎么播放了，只是，不知播放后怎么关闭！代码如下：    Dim xApp As New PowerPoint.Application    Dim xDoc As New PowerPoint.Presentation        xApp.Visible = True    Set xDoc = xApp.Presentations.Open("d:\aa.ppt")    xDoc.NewWindow
    
    xDoc.SlideShowSettings.Run
    'xDoc.Save    'xDoc.Close        'Set xDoc = Nothing    'xApp.Quit    'Set xApp = Nothing