指定フォルダ配下のファイルを全て取得する
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim strFile() As String = System.IO.Directory.GetFiles("C:\test", "*", IO.SearchOption.AllDirectories)
For i As Integer = 0 To strFile.Length - 1
Debug.Print(strFile(i))
Next
End Sub
End Class