Media Player Problem

  • VB.NET

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von 3Angle.

    Media Player Problem

    VB.NET-Quellcode

    1. Public Class Form1
    2. Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
    3. End Sub
    4. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    5. OpenFileDialog1.ShowDialog()
    6. End Sub
    7. Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
    8. For Each track As String In OpenFileDialog1.FileNames
    9. ListBox1.Items.Add(track)
    10. Next
    11. End Sub
    12. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    13. AxWindowsMediaPlayer1.URL = ListBox1.SelectedItem
    14. End Sub
    15. Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
    16. AxWindowsMediaPlayer1.Ctlcontrols.next()
    17. End Sub
    18. End Class


    Soweit bin ich schon.
    Aber der Next button geht nicht. Ich habe paar einträge in die Playlist rein gemacht aber der spielt nur 1 Lied und dann ist ende.


    Edit by Dodo:
    Obiges sieht nach VB Code aus und dies ist ein VB-Forum, wieso also den Beitrag im Offtopic erstellen?
    -> Topic verschoben (Offtopic -> Multimedia)

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Dodo“ ()

    Du hast SelectedItem benutzt. Und dies ist gewöhnlich nur eins.

    VB.NET-Quellcode

    1. For Each Song In Listbox1.SelectedItems MsgBox(Song) Next

    Dieser Beitrag wurde bereits 4 mal editiert, zuletzt von „3Angle“ ()