Question

急！！懂的进！vb如何实现歌曲自动进入下一曲

C盘有两个MP3文件，分别为c:\1.MP3和c:\2.MP3，如何利用WindowsMediaPlayer1.URL改变路径使第一首播放完毕自动播放第二首 在线等 急急急急

Answer 1

Private Sub Form_Load()
WindowsMediaPlayer1.URL = App.Path & "\1.mp3"
End Sub

Private Sub Timer1_Timer()
If WindowsMediaPlayer1.playState = wmppsStopped Then
WindowsMediaPlayer1.URL = App.Path & "\2.mp3"
End If

End Sub

Answer 2

自己做一个播放列表呗，检测到第一首歌放完了就加载第二首歌 ，用计时器实时查询

追问

有没简单点的 比如就通过代码就实现的 我觉得应该可以实现吧 就是不知道怎么编

追答

这个我也试过，没找到，不知道他原有的播放列表怎么调用，好像不能调用吧，提供的调用函数里没这一项

追问

我不想要什么播放列表 因为我做的不是音乐播放器 就是个单纯的自动连续的播放两首歌啊

追答

如果不用定时器想实现这个功能的话只能是把两手歌都放入它的播放列表中，然后连续播放。或者自己作出这一功能，检测到第一首放完了就放第二首