Open File Dialog 1 For Each track As String In OpenFileDialog1.FileNames ListBox1.Items.Add(track) Next
Import: OpenFileDialog1.ShowDialog() Play AxWindowsMediaPlayer1.URL = ListBox1.SelectedItem Stop AxWindowsMediaPlayer1.Ctlcontrols.stop()
Pause AxWindowsMediaPlayer1.Ctlcontrols.pause() Next AxWindowsMediaPlayer1.Ctlcontrols.next() Previous AxWindowsMediaPlayer1.Ctlcontrols.previous()
|