WebPageOptions.SetBackgroundSoundRepeat-Methode (Publisher)
Gibt an, ob der an eine Webseite angefügte Hintergrundsound unendlich wiedergegeben werden soll, nachdem die Seite in einem Webbrowser geladen wurde. Andernfalls wird optional angegeben, wie oft der Hintergrundsound wiedergegeben werden soll.
Syntax
Ausdruck. SetBackgroundSoundRepeat (RepeatForever, RepeatTimes)
Ausdruck Eine Variable, die ein WebPageOptions-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
RepeatForever | Erforderlich | Boolean | Gibt an, ob der Hintergrundsound unbegrenzt wiederholt werden soll. Der Wert dieses Parameters wird verwendet, um den Wert der BackgroundSoundLoopForever-Eigenschaft aufzufüllen. |
RepeatTimes | Optional | Long | Gibt an, wie oft der Hintergrundsound wiederholt werden soll. Der Wert dieses Parameters wird verwendet, um den Wert der BackgroundSoundLoopCount-Eigenschaft aufzufüllen. |
Bemerkungen
Wenn der RepeatForever-Parameter auf True festgelegt ist, kann der optionale RepeatTimes-Parameter nicht angegeben werden. Der Versuch, RepeatTimes anzugeben, wenn RepeatForever auf True festgelegt ist, führt zu einem Laufzeitfehler.
Wenn der RepeatForever-Parameter auf False festgelegt ist, muss der optionale RepeatTimes-Parameter angegeben werden. Das Weglassen von RepeatTimes, wenn RepeatForever auf False festgelegt ist, führt zu einem Laufzeitfehler.
Beispiel
Im folgenden Beispiel wird der Hintergrundsound für Seite 4 der aktiven Webveröffentlichung auf eine .wav-Datei auf dem lokalen Computer festgelegt. Wenn BackgroundSoundLoopForeverauf False festgelegt ist, wird die SetBackgroundSoundRepeat-Methode verwendet, um anzugeben, dass der Hintergrundsound unendlich wiederholt wird (beachten Sie die Auslassung des RepeatTimes-Parameters ).
Wenn BackgroundSoundLoopForever auf True festgelegt ist, wird die SetBackgroundSoundRepeat -Methode angegeben, dass der Hintergrundsound nicht unbegrenzt, sondern zweimal wiederholt werden soll.
Dim theWPO As WebPageOptions
Set theWPO = ActiveDocument.Pages(4).WebPageOptions
With theWPO
.BackgroundSound = "C:\CompanySounds\corporate_jingle.wav"
If .BackgroundSoundLoopForever = False Then
.SetBackgroundSoundRepeat RepeatForever:=True
ElseIf .BackgroundSoundLoopForever = True Then
.SetBackgroundSoundRepeat RepeatForever:=False, RepeatTimes:=2
End If
End With
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.