我想调用MediaPlayer,要求弹出窗体的时候有声音。
但是不知道为什么我设一个按钮,按的时候可以调用(代码只有MediaPlayer.play),直接把代码写入form_load()里面就出错。错误显示为:play的方法IMediaPlayer2错误。哪位高手指点一下啊,小女子这厢有礼了。
但是不知道为什么我设一个按钮,按的时候可以调用(代码只有MediaPlayer.play),直接把代码写入form_load()里面就出错。错误显示为:play的方法IMediaPlayer2错误。哪位高手指点一下啊,小女子这厢有礼了。
MediaPlayer1.FileName = "e:\windows\clock.avi"
MediaPlayer1.AutoStart = True
MediaPlayer1.Play
End Sub
可以不用mediaplayer控件,那个太耗资原你可以用sndPlaySound等API
(Private Sub Form_Load()
MediaPlayer1.FileName = "e:\windows\clock.avi"
MediaPlayer1.AutoStart = True
MediaPlayer1.Play
End Sub)
还有没有办法改进啊。sndPlaySound等API又要怎么用啊,小妹是新手,请大家多多指教啊。
你换个媒体文件播放一下看看
这行代码,如果把这行代码放到button_click()中,就没有问题,完全可以正常播放,放到form_click()中,就跳出那个窗体显示错误。我是新手,各位多多指教,谢谢了。
WindowsMediaPlayer1.Controls.Play
End Sub
Public myPlaylist As IWMPPlaylist
Public mymedia As WindowsMediaPlayer
Set mymedia = WindowsMediaPlayer1
mymedia.currentPlaylist = myPlaylist
mymedia.Controls.Play
End Sub