230问答网 > 我用二进制读取了声音文件，VB或VB.net如何播放二进制声音数据，请高手赐教！

我用二进制读取了声音文件，VB或VB.net如何播放二进制声音数据，请高手赐教！

2025-02-22 11:09:19

推荐回答（1个）

回答1：

不明白你为什么要二进制读取声音文件，VB可以直接调用API播放声音文件，不需要你二进制来读取声音文件的。

Private
Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA"
(ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Sub PlayWavFile(strFileName As String, PlayCount As Long, JianGe As Long)
'strFileName 要播放的文件名(带路径)
'playCount 播放的次数
'JianGe 多次播放时,每次的时间间隔
If Len(Dir(strFileName)) = 0 Then Exit Sub
If PlayCount = 0 Then Exit Sub
If JianGe < 1000 Then JianGe = 1000
DoEvents
sndPlaySound strFileName, 16 + 1
Sleep JianGe
Call PlayWavFile(strFileName, PlayCount - 1, JianGe)
End Sub

Private Sub Form_Click()
PlayWavFile "C:\aaa.wav", 1, 1000 '参数：播放文件，播放次数，播放间隔
End Sub

最新问答

QQ音乐好还是虾米音乐好

计算机5个组成部分各自的主要作用分别是什么？

怎么把arp -a 的、里面的IP地址作为参数或者变量传给一个批处理？

小股东的利益怎么保护

雄英三妹注册过商标吗？还有哪些分类可以注册？

新汶矿业集团伊犁能源公司，伊犁新天煤化工有限责任公司的发展怎么样？员工福利待遇如何？