2013-11-28 3 views
0

Я хочу открыть PowerPoint непосредственно в режиме слайд-шоу. Код, который я пытаюсь использовать это:Открытие презентации Powerpoint в режиме слайд-шоу

Process.Start("powerpnt", "/s "str_Presfileopen) 

«str_Presfileopen является строка, содержащая путь к файлу

Но это не работает. В нем говорится, что Comma ')' или ожидаемое продолжение выражения.

Я пытался использовать процесс запуска информация:

Dim Presfileopen As New ProcessStartInfo() 
Process.Start("powerpnt", "/s " Presfileopen) 

Но это не работает, как хорошо. Здесь также сказано, что Comma ')' или ожидаемое действительное выражение.

Какого черта я делаю неправильно? В качестве теста я написал в прямом коде, и это работает, но я не могу сделать это так, потому что мне нужно, чтобы пользователь выбирал файл из списка. код, который работает:

Process.Start("powerpnt", "/s ""a.pptx") 

ответ

1

Вы должны конкатенации строк вместе с помощью оператора & или +. Кроме того, необходимо поставить кавычки вокруг него, в случае, если имя файла содержит пробелы:

Process.Start("powerpnt", "/s """ & str_PresFileOpen & """") 
+0

Это работает, но как только я открываю презентацию в режиме слайд-шоу, я не могу открыть другой, не закрывая предыдущий. Есть ли способ решить это? –

0
Imports Microsoft.Office.Interop 

Module Module1 

Sub main() 

    Dim pptPres As PowerPoint.Presentation 
    Dim pptApp As PowerPoint.Application 
    Dim file As String 

    file = "C:\myfile.ppsm" 'example location/file' 

    pptApp = CreateObject("PowerPoint.Application") 
    pptApp.Visible = True 
    pptPres = pptApp.Presentations.Open(file) 

End Sub 
End Module 

Убедитесь, что свойства представления устанавливается только для чтения.

Смежные вопросы