vb中使用windows media player 控件设计一个MP3播放器,发现控件中的上一个和下一个按钮时灰色的
vb中使用windowsmediaplayer控件设计一个MP3播放器,发现控件中的上一个和下一个按钮时灰色的,原因何在?如何处理。谢谢。给出代码更好。注意,就是控件下面...
vb中使用windows media player 控件设计一个MP3播放器,发现控件中的上一个和下一个按钮时灰色的,原因何在?如何处理。谢谢。给出代码更好。注意,就是控件下面的上一个和下一个按钮。
注意:是windows media player,不是multimedia control,不一样的。 展开
注意:是windows media player,不是multimedia control,不一样的。 展开
4个回答
展开全部
这是因为引用wmp控件播放音乐你是使用WindowsMediaPlayer1.URL = "a.mp3" ,导致每次传递给wmp控件音乐数为1首,所以前进与后退按钮不可用,你可以建立一个播放列表,如二楼那样
引用2楼
你在你的播放器所在目录放一个a.m3u文件,文件内容类似
N:\影音文件\经典歌曲MP3\好听Mp3\知音.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\葬花吟.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\映山红.mp3
注意:一个文件占一行。
而你的文件路径行改为
Me.WindowsMediaPlayer1.URL = "a.m3u"
引用2楼
你在你的播放器所在目录放一个a.m3u文件,文件内容类似
N:\影音文件\经典歌曲MP3\好听Mp3\知音.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\葬花吟.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\映山红.mp3
注意:一个文件占一行。
而你的文件路径行改为
Me.WindowsMediaPlayer1.URL = "a.m3u"
展开全部
Private Sub Form_load()
With WindowsMediaPlayer1
.URL = App.Path & "\1.mp3" '播放第一首歌曲
.currentPlaylist.appendItem .newMedia(App.Path & "\2.mp3") '在播放列表中添加第二首歌曲
.currentPlaylist.appendItem .newMedia(App.Path & "\3.mp3") '在播放列表中添加第三首歌曲
End With
End Sub
With WindowsMediaPlayer1
.URL = App.Path & "\1.mp3" '播放第一首歌曲
.currentPlaylist.appendItem .newMedia(App.Path & "\2.mp3") '在播放列表中添加第二首歌曲
.currentPlaylist.appendItem .newMedia(App.Path & "\3.mp3") '在播放列表中添加第三首歌曲
End With
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你在你的播放器所在目录放一个a.m3u文件,文件内容类似
N:\影音文件\经典歌曲MP3\好听Mp3\知音.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\葬花吟.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\映山红.mp3
注意:一个文件占一行。
而你的文件路径行改为
Me.WindowsMediaPlayer1.URL = "a.m3u"
N:\影音文件\经典歌曲MP3\好听Mp3\知音.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\葬花吟.mp3
N:\影音文件\经典歌曲MP3\好听Mp3\映山红.mp3
注意:一个文件占一行。
而你的文件路径行改为
Me.WindowsMediaPlayer1.URL = "a.m3u"
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
加上这两行就可以
MMControl1.PrevEnabled = True
MMControl1.NextEnabled = True
MMControl1.PrevEnabled = True
MMControl1.NextEnabled = True
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询