UC知道WindowsMediaPlayer控件问题
来源：百度知道 编辑：UC知道 时间：2024/06/24 13:44:51
Private Sub WMP1_PlayStateChange(ByVal NewState As Long)
If WMP1.playState = wmppsMediaEnded Then
WMP1.URL = "E:\01.mp3"
WMP1.Controls.play
End If
End Sub
就是这样写了,它也不会播放,老是要手动按一下才能播放!
最好能把WindowsMediaPlayer控件的所有事件都贴写来,看内容加分
If WMP1.playState = wmppsMediaEnded Then
WMP1.URL = "E:\01.mp3"
WMP1.Controls.play
End If
End Sub
就是这样写了,它也不会播放,老是要手动按一下才能播放!
最好能把WindowsMediaPlayer控件的所有事件都贴写来,看内容加分
我觉得吧问题可能是
一开始wmp加载时候……不算在playstatechange事件里面……所以不会触发它
把
WMP1.URL = "E:\01.mp3"
WMP1.Controls.play
写到form_load去吧
playstatechange：状态改变时候触发如就绪变成播放、播放变成暂停、暂停变成播放等等
disconnect 失去连接
PlaylistChange 播放列表发生改变
Warning 发生警告（弹出错误消息的时候触发）
MediaError 文件错误时候……
EndOfStream 数据流结束时候……
我自己写的 网上也抄不到 呵呵 microsoft的SDK也太复杂了看不懂 呵呵