欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

'聲明API函數
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

Private Sub Form_Load()
'用sndPlaySound播放
Call sndPlaySound("C:\test.wav", SND_ASYNC)
'SND_ASYNC異步播放，SND_SYNC同步播放，好像沒(méi)什么區別，也可以和下面一樣用數字，1應該是代表異步播放。

'用PlaySound播放
'Call PlaySound("C:\test.wav", 0, 8)
'參數1為wav文件名，參數2必須取0，參數3取1表示后臺播放，取8表示循環(huán)播放，因此取9（=1+8）表示在后臺循環(huán)播放。
'參數3寫(xiě)8不能循環(huán)播放，只有寫(xiě)9，在后臺循環(huán)播放
End Sub

Private Sub Command4_Click()
Call sndPlaySound(" ", 1)'讓sndPlaySound停止播放，其實(shí)就是讓它播放一個(gè)不存在的文件，然后就終止了。
'Call PlaySound(" ", 0, 1)
End Sub
-----------------------------------------------------
如果不設置后臺播放，窗體會(huì )不能操作，sndPlaySound和PlaySound都只適合播放小音頻的播放，因為它們是把文件讀入內存，再播放的，所以很占資源。