如何在 VB 中播放资源文件中的声音?

发布网友发布时间：2022-05-27 12:56

共3个回答

热心网友时间：2023-10-23 22:37

用部件中的添加的widowsmediaplayer组件，然后再属性框里面设置路径（url）就可以了。
例如
WindowsMediaPlayer1.URL = "E:\music\百度.wav"

热心网友时间：2023-10-23 22:38

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (lpszSoundName As Any, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1 ' 异步播放
Private Const SND_NODEFAULT = &H2 ' 不使用缺省声音
Private Const SND_MEMORY = &H4 ' lpszSoundName 指向一个内存文件
Private Const SND_LOOP = &H8 ' loop the sound until next sndPlaySound

Private Sub Form_Load()
Dim B() As Byte '如果把这个语句放在过程中则将不能异步播放
B = LoadResData(101, "wav")

sndPlaySound B(0), SND_ASYNC Or SND_NODEFAULT Or SND_MEMORY

End Sub

热心网友时间：2023-10-23 22:38

...是资源文件呀