VB编程能插入MP3

来源：百度知道 编辑：UC知道 时间：2024/06/24 00:16:44
请问下代码是多少啊？

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

Private Sub Command1_Click()

Dim r As String, l As Long
r = "d:\1.wav"
l = sndPlaySound(r, 1)

End Sub

需要注意的是 你D盘必须要有1.WAV这个文件

用WindowsMediaPlayer