Поделиться через


Воспроизведение звуков (Visual Basic)

Объект My.Computer.Audio предоставляет методы воспроизведения звуков.

Воспроизведение звуков

Фоновое воспроизведение позволяет приложению выполнять другой код во время воспроизведения звука. Метод My.Computer.Audio.Play позволяет приложению воспроизводить только один фоновый звук за раз; когда приложение воспроизводит новый фоновый звук, он останавливает воспроизведение предыдущего фонового звука. Вы также можете воспроизвести звук и ждать завершения.

В следующем примере My.Computer.Audio.Play метод воспроизводит звук. Когда AudioPlayMode.WaitToComplete задано, My.Computer.Audio.Play ожидает завершения звука, после чего программный код продолжит выполнение. При использовании этого примера необходимо убедиться, что имя файла ссылается на .wav звуковой файл, который находится на компьютере

Sub PlayBackgroundSoundFile()
    My.Computer.Audio.Play("C:\Waterfall.wav",
        AudioPlayMode.WaitToComplete)
End Sub

В следующем примере My.Computer.Audio.Play метод воспроизводит звук. При использовании этого примера необходимо убедиться, что ресурсы приложения включают звуковой файл .wav с именем Каскад.

Sub PlayBackgroundSoundResource()
    My.Computer.Audio.Play(My.Resources.Waterfall,
        AudioPlayMode.WaitToComplete)
End Sub

Воспроизведение повторяющихся звуков

В следующем примере метод My.Computer.Audio.Play воспроизводит указанный звук в фоновом режиме, когда задан параметр PlayMode.BackgroundLoop. При использовании этого примера необходимо убедиться, что имя файла ссылается на .wav звуковой файл, который находится на компьютере.

Sub PlayLoopingBackgroundSoundFile()
    My.Computer.Audio.Play("C:\Waterfall.wav",
        AudioPlayMode.BackgroundLoop)
End Sub

В следующем примере метод My.Computer.Audio.Play воспроизводит указанный звук в фоновом режиме, когда задан параметр PlayMode.BackgroundLoop. При использовании этого примера необходимо убедиться, что ресурсы приложения включают звуковой файл .wav с именем Каскад.

Sub PlayLoopingBackgroundSoundResource()
    My.Computer.Audio.Play(My.Resources.Waterfall,
          AudioPlayMode.BackgroundLoop)
End Sub

Приведенный выше пример кода также доступен в виде фрагмента кода IntelliSense. В элементе выбора фрагмента кода он расположен в Windows Forms Applications > Sound. Дополнительные сведения см. в фрагментах кода .

Как правило, когда приложение воспроизводит циклический звук, оно должно в конечном итоге остановить звук.

Остановка воспроизведения звуков в фоновом режиме

My.Computer.Audio.Stop Используйте метод, чтобы остановить текущее воспроизведение фонового или циклического звука приложения.

Как правило, когда приложение воспроизводит циклический звук, оно должно его в какой-то момент остановить.

Следующий пример останавливает звук, воспроизводимый в фоновом режиме.

Sub StopBackgroundSound()
    My.Computer.Audio.Stop()
End Sub

Приведенный выше пример кода также доступен в виде фрагмента кода IntelliSense. В элементе выбора фрагмента кода он расположен в Windows Forms Applications > Sound. Дополнительные сведения см. в фрагментах кода .

Воспроизведение системных звуков

Используйте метод My.Computer.Audio.PlaySystemSound для воспроизведения указанного системного звука.

Метод My.Computer.Audio.PlaySystemSound принимает в качестве параметра один из общих членов класса SystemSound . Системный звук Asterisk обычно обозначает ошибки.

В следующем примере используется My.Computer.Audio.PlaySystemSound метод для воспроизведения системного звука.

Sub PlaySystemSound()
    My.Computer.Audio.PlaySystemSound(
        System.Media.SystemSounds.Asterisk)
End Sub

См. также