在 Global External Functions 宣告
Function boolean sndPlaySoundA (string SoundName, ulong Flags) Library "WINMM.DLL" alias for "sndPlaySoundA;Ansi"
Function ulong waveOutGetNumDevs () Library "WINMM.DLL"
程式中
//播放Wav
long lul_numdevs,a
a=long(sle_1.text)
lul_numdevs = WaveOutGetNumDevs() //Flags為播放風格（0同步播放，1異步播放，2不播放默認檔案，4指向聲音檔案的記憶體指標地址，8回圈播放，16如果當前正在播放，則不回應新的請求）
If lul_numdevs > 0 Then
sndPlaySoundA("C:\Users\lenovo\Desktop\aaa\yzts.WAV", a)
End If
在原始碼下面運行可以播放音樂 編譯成exe就不播放了 lul_numdevs =0
uj5u.com熱心網友回復：
是不是缺少了dll導致的？把編譯好的程式放到pb的dll里試試轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/22961.html
標籤：API 調用