如题,我加了个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等)作为背景音乐或者程序音效,可以怎么做?
望达人指教,谢谢!
望达人指教,谢谢!
http://www.multimediasoft.com/amp3dj/
my blog
http://ufo-crackerx.blog.163.com/
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 LongPrivate Sub cmdb_Click()
mciSendString "play e:\5.mp3", vbNullString, 0, 0
End SubPrivate Sub cmde_Click()
mciSendString "close e:\5.mp3", vbNullString, 0, 0End Sub
我试过,可是它说Controls没有play这个属性,我也不知道为什么
请教, 这段code写在哪儿,在form_load中?还是在其它什么地方