首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

使用windowsmediaplayer全屏播放视频结束后,怎么隐藏该控件

2012-12-17 
使用windowsmediaplayer全屏播放视频结束后,如何隐藏该控件使用windowsmediaplayer全屏播放视频结束后,如

使用windowsmediaplayer全屏播放视频结束后,如何隐藏该控件
使用windowsmediaplayer全屏播放视频结束后,如何隐藏该控件
PlayStateChange事件貌似不管用
[解决办法]
没分就没人来啊  好悲哀
[解决办法]
可能要用定时器控件来实时判断播放的位置是否到达媒体的终点,然后触发windowsmediaplayer.VISIBLE事件.
[解决办法]
1.windowsmediaplayer播放完毕后触发endofstream事件。所以隐藏要写到endofstream 中。
2.windowsmediaplayer播放完毕后最好把filename属性置空,然后再隐藏。
[解决办法]
endofstream事件也不行
[解决办法]
调试的时候 他都不执行endofstream事件
[解决办法]
你用的什么控件?msdxm.ocx吗?。
方便把相关代码发上来吗?
[解决办法]

Private Sub Form_Load()
WindowsMediaPlayer1.Move 0, 0, Screen.Width, Screen.Height
End Sub

Private Sub WindowsMediaPlayer1_PlayStateChange(ByVal NewState As Long)
  If (WindowsMediaPlayer1.playState = wmppsPlaying) Then
      WindowsMediaPlayer1.fullScreen = True
  ElseIf WindowsMediaPlayer1.playState = wmppsStopped Then
      WindowsMediaPlayer1.URL = ""
      WindowsMediaPlayer1.Visible = False
  End If
End Sub


现在好像可以了

热点排行