Mega Code Archive

 

Categories / VisualBasic Script / Windows API

 

Get return value from sound play function

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long Sub playSound()     Dim returnVal As Long     returnVal = sndPlaySound("C:\myWave.wav", 0) End Sub