Private Sub WindowsMediaPlayer1_PlayStateChange(ByVal NewState As Long)
If WindowsMediaPlayer1.playState = wmppsMediaEnded Then
WindowsMediaPlayer1.Visible = False
WindowsMediaPlayer1.uiMode = "None"
End If
End Sub
希望可以帮到你
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024