7 Ноябрь 2008

Как воспроизвести WAV-файл?

Мультимедиа |  Таги: ,

Как воспроизвести WAV-файл?

Option Explicit
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1

Private Sub Form_Load()
    Call sndPlaySound("C:\WINDOWS\Media\tada.wav", SND_ASYNC)
End Sub

Запись опубликована on 07.11.2008 at 1:07 и размещена в рубрике: Мультимедиа. Вы можете читать комментарии, используя RSS-ленту. Вы можете оставить комментарий, или отправить трекбек с Вашего сайта.



Оставить комментарий

Я не робот.