1
我用mp3play做播放器,现在碰到以下问题
暂停,它就触发Mp3Play2_ThreadEnded事件,或一首歌正在播放我又点了另一首歌的播放也会确发Mp3Play2_ThreadEnded事件等.ThreadEnded事件我只有在顺序或随机播放时用到,其它时候我不想触发它,有没有什么办法跳过它呢,
2
在mp3play里面有没有其它方法,或事件,或属性或请客位高手给个代码可以得到一首歌的结束
谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢
Private Sub Command1_Click()
mp3play.stop
.......
mp3play.play'播放
end sub
Private Sub Command2_Click()
mp3play1.stop
'暂停
end sub
Private Sub Mp3Play2_ThreadEnded()
'每次加一,播放下一首歌
end sub
我用mp3play做播放器,现在碰到以下问题
暂停,它就触发Mp3Play2_ThreadEnded事件,或一首歌正在播放我又点了另一首歌的播放也会确发Mp3Play2_ThreadEnded事件等.ThreadEnded事件我只有在顺序或随机播放时用到,其它时候我不想触发它,有没有什么办法跳过它呢,
2
在mp3play里面有没有其它方法,或事件,或属性或请客位高手给个代码可以得到一首歌的结束
谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢
Private Sub Command1_Click()
mp3play.stop
.......
mp3play.play'播放
end sub
Private Sub Command2_Click()
mp3play1.stop
'暂停
end sub
Private Sub Mp3Play2_ThreadEnded()
'每次加一,播放下一首歌
end sub
dim UserCtrl as boolean
按command1的时候就把它设成真值
直到command1的代码执行完再设置回来sub command1_click()
UserCtrl=True
……'你的正常代码
UserCtrl=False
end sub然后在ThreadEnded事件里的第一行写
if UserCtrl then exit sub这样应该就行了
1我在点播放时,它会‘先’调用,Private Sub Mp3Play2_ThreadEnded()事件,‘后’才调用播放事件,
2同样,我做循环播放也会调用,Private Sub Mp3Play2_ThreadEnded()事件,
我怎么做才能让,Private Sub Mp3Play2_ThreadEnded()事件知道,是播放,还是循环呢,
现在问题关键是,两次调用,都是‘先’调用,Private Sub Mp3Play2_ThreadEnded()事件的,
谢谢朋友 问,,帮帮我呀,,头很大了,