This is simple code for playing sounds (.wav) using visual Basic. first create a module and paste or type the following code:


Private Declare Function sndPlaySound Lib "winmm" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Public Enum SND_Settings
SND_SYNC = &H0
SND_ASYNC = &H1
SND_NODEFAULT = &H2
SND_MEMORY = &H4
SND_LOOP = &H8
SND_NOSTOP = &H10
SW_SHOW = 5
End Enum

Public Sub Play(fname As String, Optional Settings As SND_Settings = SND_ASYNC)
Dim retval As Long
retval = sndPlaySound(fname, Settings)
End Sub

Then, to play the sound you want, use the play command on a control (Command Buttons are exellent.):

Play "c:\song.wav"

NOTE: The filename "song" can be changed to any .wav file you saved on your disk

ummmm...thanks??

read the FAQ's..... and read the part on the front page for New users.... Welcome to TPU>....

and why should one not simply type sndPlaySound( "name", 1 ); ?

isn't there a PlaySound in some other library which is the same, but includes a sound application handle?