如何在PB中播放WAV文件

声明API函数：  
  Function   boolean   sndPlaySoundA(   string   SoundName,   uint   Flags   )   Library   "WINMM.DLL"  
  Function   uint   waveOutGetNumDevs()   Library   "WINMM.DLL"  
   
  使用以下的代码来播放声音文件:    
   
  uint   lui_NumDevs  
   
  lui_NumDevs   =   WaveOutGetNumDevs()  
  IF   lui_NewDevs   >   0   THEN  
          sndPlaySound(   "filename.wav",   modeofplay   )  
  END   IF  
  其中:   modeofplay  
  0   -   同步播放  
  1   -   异步播放  
  2   -   如果找不到声音文件，不使用缺省的声音文件  
  3   -   第1项与第2项  
  8   -   循环播放直到下一个sndPlaysound  
  10-   不停止播放  
   
   
  返回值:  
  0   出错（通常是文件没有找到）  
  1   成功