Test Foro de elhacker.net SMF 2.1

Hola no se si alguien tendra un proyecto o codigo , o que me de las pautas ,para un proy. que haga lo siguiente:

con un openfiledialog elija la carpeta, esto lista todos los videos en un listboxt de manera vertical , al hacer doble clic en uno de ellos este reprodusca el video.

P.D> si no es molestia que sea en .NET

En un proyecto WPF un control llamado MediaElement puede reproducir videos en formatos propios de Windows.

Agrega los siguientes objetos:

• TextBox1
• Button1
• ListBox1
• AxWindowsMediaPlayer1

Y agrega el siguiente código:
  Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
       Dim FolderBrowserDialog1 As New FolderBrowserDialog
       FolderBrowserDialog1.Description = "Seleccione el Directorio"
       Dim dirSelected As DialogResult = FolderBrowserDialog1.ShowDialog(Me)

       If dirSelected = DialogResult.OK Then
           TextBox1.Text = FolderBrowserDialog1.SelectedPath
       End If

       ListBox1.Items.Clear()
       Try
           Dim folders() As FileInfo = New DirectoryInfo(TextBox1.Text).GetFiles
           For Each folder As FileInfo In folders
               ListBox1.Items.Add(folder.Name)
           Next
       Catch ex As Exception
           MessageBox.Show(ex.Message)
       End Try
   End Sub

   Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
       AxWindowsMediaPlayer1.URL = TextBox1.Text & "\" & ListBox1.SelectedItem.ToString
   End Sub

Recordad agregar la librería,
Imports System.IO

Resultado,