Hola nuevamente. Bueno tengo un problema y no se como solucionarlo aver si me ayudan.
Estoy creando un reproductor con VB con el comando MMcontrol bueno pero el MMcontrol solo lo uso para indicar los botones PLAY PAUSE STOP BACK NEXT ETC ETC.
Estoy utilizando lo siguiente para hacerlo:
1--> DrivelistBox (para los discos)
2--> DirlistBox (Para el directorio)
3--> FilelistBox (Muestra los archivos del directorio)
4--> 2 ListBox (en el primer list box aparece el tema y en la segunda lista la ruta del tema + el tema)
5--> Command botton para el agrgar a la lista borrar la lista play pause back next esas cosas
6 MMcontrol.
Bueno el problema mio es como debo hacer para que cuando agregue las canciones en la lista se reproduscan mi codigo es el siguiente:
Private Sub Play_Click()
MMControl1.FileName = List2.List(0)
MMControl1.Command = "OPEN"
MMControl1.Notify = True
MMControl1.Command = "PLAY"
End Sub
Ese codigo esta bien reproduce el tema de la lista empesando desde el primero pero en este tengo el problema:
Private Sub MMControl1_Done(NotifyCode As Integer)
End Sub
En este paso tengo que poner cuando finalice la pista 0 siga con el 1 luego el 2 y asi susecivamente, prove muchas formas pero ninguna me sirvio :('
Espero que me ayuden desde ya muchas gracias hasta luego.
