dim bmps() as string
bmps = System.Io.Directory.GetFiles(<path to folder>, "*.bmp")
ListBox1.Datasource=bmps
Dim strFiles As String() = IO.Directory.GetFiles("C:\", "*.bmp")
Dim strBmp As String
For Each strBmp In strFiles
Dim strName As New IO.FileInfo(strBmp) /// this will return the name only ( eg: mybmp.BMP )
Console.WriteLine(strName.Name)
Next