Přehrávání WAV souborů

Postup:
Do deklarační části formuláře zapište:

Private Declare Function sndPlaySound Lib "winmm.dll" _
   Alias "sndPlaySoundA" (ByVal lpszSoundName As String, _
   ByVal uFlags As Long) As Long

Na událost Form_Load:

Private Sub Form_Load()

sndPlaySound "c:\winnt\media\roar.wav", 1
'číslo '1' znamená, že aplikace spustí přehrávání a pokračuje ve své činnosti.
'Pokud chcete, aby aplikace počkala na ukončení zvuku a pak pokračovala,
'zaměňte číslo za 0

End Sub

Zpět

Autor: The Bozena