Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1         '  play asynchronously
Private Const SND_NODEFAULT = &H2         '  silence not default, if sound not found
Private Const SND_NOSTOP = &H10        '  don't stop any currently playing sound'要加上SND_NODEFAULT,否则系统会用默认声音
sndPlaySound "C:\My Documents\learn\start.wav", SND_ASYNC Or SND_NODEFAULT