I have looked but cant seem to find out why this won't work for me
I added this Code inside Timer1 in my form
dim Boolean1 as Boolean
if Boolean1 = true and WMP1.playState = WMPLib.WMPPlayState.wmppsPlaying then
WMP1.Ctlcontrols.pause()
Boolean1 = false
end if
if Boolean1 = false and WMP1.playState = WMPLib.WMPPlayState.wmppsPaused then
WMP1.Ctlcontrols.play()
Boolean1 = true
end if
Aucun commentaire:
Enregistrer un commentaire