vb中如何添加背景音乐？

是用windowmediaplayer空间

在工程——部件里面找到

应该在最下面

方法使用

windowmediaplayer1.url="e:\mp3\1.mp3"

放到form_load事件里面

拖进一个Windows

Media

Player控件,

设置其Visible属性为False

然后在Form_Load中用Windows

Media

Player加载你的背景音乐播放就OK了.

WindowsMediaPlayer1.Controls.play'播放

WindowsMediaPlayer1.Controls.stop'停止

WindowsMediaPlayer1.Controls.pause'暂停

你这样连续让它播放\停止\暂停,它最后就是停止了,当然没有声音啦

Private Sub WindowsMediaPlayer1_OpenStateChange(ByVal NewState As Long)

WindowsMediaPlayer1.URL = "e:\wj\j.mp3"

WindowsMediaPlayer1.Controls.play

End Sub

就可以了

---