[معاند الحظ]

انسخ الكود التالي وضعه في محرر كود التابع للفورم الذي يحتوي على اداة ويندوز ميديا بلاير

كود :

 Private Sub AxWindowsMediaPlayer1_PlayStateChange(sender As Object, e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles AxWindowsMediaPlayer1.PlayStateChange
       If (AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsPlaying) Then
           'Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
           'Me.WindowState = FormWindowState.Maximized

           Try

               AxWindowsMediaPlayer1.fullScreen = True

           Catch ex As Exception

           End Try

       End If
   End Sub