ok so i got some thing here.

Code:
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        Dim Allfiles As String() = IO.Directory.GetFiles("C:\Users\TECHKER\Desktop\PROGRAMMING\PROJECTS\trainersTool\trainersTool\Images")
        Dim strfile As String
        For Each strfile In Allfiles
            Dim filename As New IO.FileInfo(strfile) '/// this will give you the file name etc...
            ListBox1.Items.Add(filename.Name)
        Next
    End Sub
but it doesn't show anything..