在线等待！！！

[ybuan]

vb中怎样播放一个声音文件，除了用MEDIA PLAY主件外？

[golden24kcn]

' 高级声音支持 API
Declare Function sndPlaySound Lib "WINMM.DLL" Alias "sndPlaySoundA" _
(lpszSoundName As Any, ByVal uFlags As Long) As Long

Global Const SND_ASYNC = &H1 ' 异步播放
Global Const SND_NODEFAULT = &H2 ' 不使用缺省声音
Global Const SND_MEMORY = &H4 ' lpszSoundName 指向一个内存文件

Sub BeginPlaySound(ByVal ResourceId As Integer)
SoundBuffer = LoadResData(ResourceId, "ATM_SOUND")''资源文件里的.wav文件
sndPlaySound SoundBuffer(0), SND_ASYNC Or SND_NODEFAULT Or SND_MEMORY
End Sub

Sub EndPlaySound()
sndPlaySound ByVal vbNullString, 0&
End Sub

这个例子来自MSDN的示例文件啊!!

[yoki]

9494
要多看book online啊
而且提问前先搜索一下，论坛上这个问题已经好多了

[cjlong]

如果就是WAV，给以用VB中自带的控件

[zjcxc]

学

[rainstormmaster]

//要多看book online啊
而且提问前先搜索一下，论坛上这个问题已经好多了

同感