vb编写视频中一段路循环播放
1个回答
2016-09-01
展开全部
'如果是用的Windows MediaPlayer 就可以在里面加这样一段代码
'当播放器的播放状态改变是:
Private Sub MediaPlayer1_PlayStateChange(ByVal NewState As Long)
If NewState = 1 Then'1为停止(一曲播完)
MediaPlayer1.Controls.play'再播放
End If
End Sub
'当播放器的播放状态改变是:
Private Sub MediaPlayer1_PlayStateChange(ByVal NewState As Long)
If NewState = 1 Then'1为停止(一曲播完)
MediaPlayer1.Controls.play'再播放
End If
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询