Creare lettore MP3 in stile WMP

Public Class Form1
Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdScegli.Click
        Dim mystreamreader As System.IO.StreamReader
        With OpenFileDialog1
            .CheckFileExists = True
            .FileName = ("Scegli la tua canzone")
            .Filter = "Audio Files (*.mp3) |*.mp3"
            .InitialDirectory = "C:\"
            .Multiselect = True
            .ShowDialog()
            Me.Text = "Stai ascoltando :" & OpenFileDialog1.FileName
        End With
        Try

            OpenFileDialog1.OpenFile()
            AxWindowsMediaPlayer1.URL = (OpenFileDialog1.FileName)


        Catch ex As Exception

        End Try

    End Sub

    Private Sub button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStop.Click
        AxWindowsMediaPlayer1.close()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        AxWindowsMediaPlayer1.Visible = False
        AxWindowsMediaPlayer1.settings.volume = 100
        AxWindowsMediaPlayer1.URL = ("C:\Windows\Media\Windows Logon Sound.wav")
        AxWindowsMediaPlayer1.Visible = True
    End Sub
End Class