Test Foro de elhacker.net SMF 2.1

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

Título: Ayuda con "AxWindowsMediaPlayer" [Solucionado] Pueden cerrar el tema
Publicado por: SγиtαxEяяoя en 20 Agosto 2013, 22:31 PM
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
           
CitarCase 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
Título: Re: Ayuda con "AxWindowsMediaPlayer"
Publicado por: SγиtαxEяяoя en 20 Agosto 2013, 22:37 PM
LOL  :silbar: :silbar: :silbar:


Código (vbnet) [Seleccionar]
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)