VB这个怎么写？

WindowsMediaPlayer1.URL = "1.MP3"

我想要的效果是   播放完1.mp3又播放下一曲2.mp3  

这个代码该怎么写啊？      大哥  大侠   大姐姐   会的您  就帮帮我吧!    先谢谢   

      

VB的哈

其实我感觉可以用API函数mciSendString呀...这个挺简单的，有兴趣的话可以加我Q，631759794

定义一个数组啊如

Music(100) as string ' 记录你要播放的音乐路径。

通过改变数组下标即可播放啊

如 music(0) = "1.mp3" : music(1) = "2.mp3"

Private Sub Timer1_Timer()

    Dim m1, m2 As Double     dim i as Integer

    m1 = WindowsMediaPlayer2.Controls.currentPosition  '当前播放进度数(double)     m2 = WindowsMediaPlayer2.currentMedia.duration '终点进度数      If Abs(m1 - m2) <= 1 Then  '当前进度与终点进度这差接近时

    i=i+1

    WindowsMediaPlayer1.URL =music(i)

    end if

end sub

注意判断一首MP3是否播放完毕也在Timer事件中时实进行比较

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息