VB 景音乐有关问题~加了WMPlayer，可是却没有声音~求教

VB 景音乐问题~~加了WMPlayer，可是却没有声音~求教
如题，我加了个WindowsMmediaPlayer的控件，设置了路径，可是却没有声音，是怎么回事？

以下是我的代码：

 Private Sub BlackJackForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

  MusicPlayer.URL = Application.StartupPath & "\bgmusic.mp3"

  End Sub

我需要使用相对路径，音乐文件放在工程文件夹里的sounds文件夹下。

还有，如果我想让用户可以从电脑里选择自己的音乐（mp3,vav等）作为背景音乐或者程序音效，可以怎么做？
望达人指教，谢谢！

------解决方案--------------------
Option Explicit
Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long

Private Sub cmdb_Click()
mciSendString "play e:\5.mp3", vbNullString, 0, 0
End Sub

Private Sub cmde_Click()
mciSendString "close e:\5.mp3", vbNullString, 0, 0

End Sub