我看过但似乎无法找出为什么这对我不起作用
我以我的形式在Timer1中添加了此代码
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