在VB中使用windows media player，如何让它循环播放？
1个回答
展开全部
'如果是用的Windows
MediaPlayer
就可以在里面加这样一段代码'百度Hi群&飞度编程学社
1195277
'当播放器的播放状态改变是
Private
Sub
MediaPlayer1_PlayStateChange(ByVal
NewState
As
Long)
If
NewState
=
1
Then'1为停止(一曲播完)
MediaPlayer1.Controls.play'再播放
End
If
End
Sub
MediaPlayer
就可以在里面加这样一段代码'百度Hi群&飞度编程学社
1195277
'当播放器的播放状态改变是
Private
Sub
MediaPlayer1_PlayStateChange(ByVal
NewState
As
Long)
If
NewState
=
1
Then'1为停止(一曲播完)
MediaPlayer1.Controls.play'再播放
End
If
End
Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
