Imprimir Página - Ayuda con "AxWindowsMediaPlayer" [Solucionado] Pueden cerrar el tema

Buenas, estoy tratando de averiguar como logro que al finalizar de reproducir una cancion me regrese un valor

Esta es la propiedad del reproductor

Citar

Private Sub AxWindowsMediaPlayer1_PlayStateChange(ByVal sender As Object, ByVal e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles AxWindowsMediaPlayer1.PlayStateChange
   Select Case e.newState
   Case WMPLib.WMPPlayState.wmppsPlaying
   ToolStripStatusLabel2.Text = "Reproduciendo"
   Case WMPLib.WMPPlayState.wmppsPaused
   ToolStripStatusLabel2.Text = "En Pausa"
   Case WMPLib.WMPPlayState.wmppsStopped
   ToolStripStatusLabel2.Text = "Sin Reproducción"
   End Select
   End Sub

Me pregunto si existe algo como esto

Citar

Case WMPLib.WMPPlayState.wmppsFinish 'Aqui que me regrese el nombre a un boton "Play"
B_PlayPause.Text = "Play"

Estas son la propiedades del boton "Play/Pause"

Citar

Private Sub B_PlayPause_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles B_PlayPause.Click
   If B_PlayPause.Text = "Pause" Then
   AxWindowsMediaPlayer1.Ctlcontrols.pause()
   B_PlayPause.ImageIndex = 1
   B_PlayPause.Text = "Play"
   Else
   AxWindowsMediaPlayer1.Ctlcontrols.play()
   B_PlayPause.ImageIndex = 0
   B_PlayPause.Text = "Pause"
   End If
   End Sub

LOL :silbar: :silbar: :silbar:

Código

Case WMPLib.WMPPlayState.wmppsMediaEnded
                B_PlayPause.Text = "Play  "

Ya lo solucione :p

Jjajaja no me percate en que en

(http://i.imm.io/1fCMm.png)

Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: SγиtαxEяяoя en 20 Agosto 2013, 22:31 pm