Best Answer - Chosen by Asker
I pulled this from: http://www.thescarms.com/dotnet/ListFile…

Public Sub ListDir(ByVal directory As String, ByVal fileType As String)
Dim di As New IO.DirectoryInfo(directory)
Dim aryFi As IO.FileInfo() = di.GetFiles(fileType)
Dim fi As IO.FileInfo

For Each fi In aryFi
ListBox1.Items.Add(fi.Name)
Next
End Sub