关于mediaplayer控件的问题

Question

请问有哪位大虾能在VB中通过控件点击将mediaplayer全屏播放，然后通过任意点击返回原来大小，很急，在线等待
    谢谢了

Answer 1

//请问有哪位大虾能在VB中通过控件点击将mediaplayer全屏播放
Private Sub Command1_Click()
Me.MediaPlayer1.DisplaySize = mpFullScreenEnd Sub//然后通过任意点击返回原来大小
很难，全屏幕后mediaplayer将鼠标事件接管了

Answer 2

当时我用WMP做MediaPlayer时用的是ESC键，然后根据先前记录下的窗体信息（临时变量）就可以恢复原来的大小了。如果非要用鼠标也不是全没办法，曾经有人成功地拦截过FlashOCX的鼠标右键（我有代码），但是用于WMP可能不行。回去试试。要不然把那段代码发给你自己回去研究。
好像主要是用的enumwindow，而且很难被跟踪。