Альтернативный способ, чтобы получить все окно списка файлов из папки и вложенные папки ECT в VB.NET каталог

---

текущий способ, которым я получил инст, работает хорошо, иногда он не работает, есть ли другой способ к тому, что ниже, или способ улучшить :

Sub scanSubfolders(ByVal FolderLocation As String, ByVal lstbox As ListBox)
        For Each s In My.Computer.FileSystem.GetFiles(FolderLocation)
            Try
                lstbox.Items.Add(s)

            Catch ex As Exception

            End Try
        Next
        For Each s In My.Computer.FileSystem.GetDirectories(FolderLocation)
            Try
                scanSubfolders(s, ListBox1)
            Catch ex As Exception

            End Try
        Next
    End Sub

овации


о и форма нагрузки

scanSubfolders(My.Computer.FileSystem.SpecialDirectories.Temp, Me.ListBox1)

Что я уже пробовал:

я написал выше, что я пробовал, так что надеюсь, что кто-то может помочь.

---