有没有办法在每次点击按钮时播放音频/音乐?我使用此代码播放音频mciSendString("play " & musicAlias, CStr(0), 0, 0)
。我想在每次点击按钮时播放它。我已将它放在按钮中,但问题是它唯一的播放。
提前感谢。
答案 0 :(得分:1)
10s的谷歌搜索给你几个答案..
对于wave文件(.wav),您只需使用My.Computer.Audio.Play("C:\Users\Public\Music\Sample Music\Kalimba.wav.")
MP3文件有点复杂,如果你不想使用WMP controll元素,甚至更多。
Here您的另一篇文章提出了与您相同的请求。并且有几个SO帖子具有相同的主题。
答案 1 :(得分:0)
我得到了先生,它的工作就像我想要的一样。
Private Sub playSound()
Dim Mytone As New System.Media.SoundPlayer
Mytone.SoundLocation = "audio.wav"
Mytone.Load()
Mytone.Play()
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cexitButton.Click
playsound()
End Sub