Question

我的窗体中嵌入了一个Windows媒体播放器对象，它设置为自动播放视频我想让视频永远循环，但无法弄清楚如何！

在设计视图中右键单击对象会显示设置并包含“播放计数”，但将其设置为0将不起作用。一旦关闭属性窗口，它就会恢复为1。它也不会接受-1。最大设置为999，这是不够的，因为视频只会循环几个小时。

这就是我操纵控件的方式：

    wmpPlayer.Ctlcontrols.play()

    wmpPlayer.Ctlcontrols.pause()

    wmpPlayer.URL = ofdOpen.FileName 'Play

  ' This does NOT work to make repeat forever!...
  ' wmpPlayer.settings.playCount() = 0

我尝试过像这样捕捉'PlayStateChanged'事件：

Private Sub wmpPlayer_PlayStateChange_1(sender As Object, e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles wmpPlayer.PlayStateChange
If e.newState = 8 Then
    wmpPlayer.Ctlcontrols.play()
End If
'0 = Undefined
'1 = Stopped (by User)
'2 = Paused
'3 = Playing
'4 = Scan Forward
'5 = Scan Backwards
'6 = Buffering
'7 = Waiting
'8 = Media Ended
'9 = Transitioning
'10 = Ready
'11 = Reconnecting
'12 = Last
End Sub

但我不确定这种方法是否一直有效。我让我的程序在两台机器上一夜之间运行，今天早上一台仍在运行，但另一台机器已经停止了。

Answer 1

我希望该视频永远循环，但无法弄清楚如何！

只需将设置中的“循环”模式属性设置为true：

wmpPlayer.settings.setMode("Loop", True)

wmpPlayer永远重复

1 个答案: