Private Sub Browse_ButtonX2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Browse_ButtonX2.Click

        ListBoxControl1.Items.Clear()
        Select Case FolderBrowserDialog1.ShowDialog()
            Case DialogResult.OK

                Call FileTypeFinder(FolderBrowserDialog1.SelectedPath, ".wav")
        End Select

    End Sub

Private Sub FileTypeFinder(ByVal dir As String, ByVal fileExt As String)

        Try
            ' Display all files in a directory that match file type
            For Each fname As String In IO.Directory.GetFiles(dir)
                If fname.EndsWith(fileExt) Then
                    ListBoxControl1.Items.Add(My.Computer.FileSystem.GetName(fname))

                End If
            Next

            ' A recursive call for all the subdirectories in this directory.
            For Each subdir As String In IO.Directory.GetDirectories(dir)
                FileTypeFinder(subdir, fileExt)

            Next

        Catch ioex As System.UnauthorizedAccessException

        Catch ex As Exception
            MessageBox.Show(ex.Message.ToString)

        End Try

    End Sub

Private Sub Add_ButtonX1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Add_ButtonX1.Click

        Select Case ListBoxControl1.Items.Count
            Case 0
                MsgBox("There is nothing to add. Please browse for wav files.")
                Return
        End Select

        Try
            For Each str As String In Me.ListBoxControl1.SelectedItems
                Me.ListBoxControl2.Items.Add(str)

            Next

            For i As Integer = 0 To Me.ListBoxControl1.Items.Count - 1
                If Me.ListBoxControl1.SelectedIndex = i Then Me.ListBoxControl1.Items.RemoveAt(i)

            Next
        Catch ex As Exception
            MsgBox(ex.Message)

        End Try

    End Sub

System.IO.File.Copy("C:\file.txt", "C:\Users\newLocation.txt")

Imports System.IO
        listbox1.Items.AddRange(Directory.GetFiles("C:\", "*.wav", SearchOption.AllDirectories))