Imports System.ComponentModel
Imports AxWMPLib

Public Class Form75
    Private Sub Form75_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        AxWindowsMediaPlayer1.enableContextMenu = False
        AxWindowsMediaPlayer1.Enabled = False
    End Sub

    Private Sub AxWindowsMediaPlayer1_StatusChange(sender As Object, e As EventArgs) Handles AxWindowsMediaPlayer1.StatusChange
        If AxWindowsMediaPlayer1.playState = WMPLib.WMPPlayState.wmppsStopped Then
            Close()
        End If
    End Sub

    Private Sub Form75_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
        AxWindowsMediaPlayer1.Ctlcontrols.stop()
        Form88.Close()
        AxWindowsMediaPlayer1.Ctlcontrols.stop()
        AxWindowsMediaPlayer1.currentPlaylist.clear()
        Form25.AxWindowsMediaPlayer1.Ctlcontrols.play()
        Form25.PictureBox1.Hide()
        Form25.PictureBox2.Show()
        AxWindowsMediaPlayer1.URL = ""
        Form25.Enabled = True
    End Sub
End Class