2014-12-28 4 views
0

Visual Basic의 특정 폴더에서 모든 비디오를 재생하려고합니다. WMP에서 컨트롤을 표시하고 컨트롤없이 비디오를 양식에서 재생하기 때문에 어떤 컨트롤을 사용해야하는지 잘 모르겠습니다. 다른 옵션은 MS TV 비디오 컨트롤이 될 수 있습니다.특정 폴더의 비디오 재생

지금 당장 가장 중요한 문제는 재생/중지 버튼을 표시하지 않고 폴더에서 동영상을 재생하는 방법입니다.

나는 이런 식으로 뭔가 할 수있는 :

For Each foundFile As String In My.Computer.FileSystem.GetFiles(
    My.Computer.FileSystem.SpecialDirectories.MyDocuments) 
    listBox1.Items.Add(foundFile) 
Next 

을하지만 컨트롤이 목록에 모든 것을 재생하는 방법을 모르겠어요.

+0

에 오신 것을 환영합니다! * 신중하게 검토 * : [물어보십시오] – Plutonix

답변

3

이 코드는 폴더에서 반복 재생 목록을 만드는 방법 또한 WMP 컨트롤에서 컨트롤을 제거하는 방법을 보여줍니다 스택 오버플로

Public Class Form1 

    Private Playlist As WMPLib.IWMPPlaylist 

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load 
     AxWindowsMediaPlayer1.uiMode = "none" 
     AxWindowsMediaPlayer1.settings.setMode("loop", True) 
     Playlist = AxWindowsMediaPlayer1.newPlaylist("MyPlayList", "") 
     AxWindowsMediaPlayer1.currentPlaylist = Playlist 
    End Sub 

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then 
      Button1.Enabled = False 
      Playlist.clear() 
      For Each video As String In System.IO.Directory.GetFiles(FolderBrowserDialog1.SelectedPath, "*.wmv") 
       Playlist.appendItem(AxWindowsMediaPlayer1.newMedia(video)) 
      Next 
      AxWindowsMediaPlayer1.Ctlcontrols.play() 
     End If 
    End Sub 

End Class