จะหาข้อมูลทั้งหมดใน folder นั้นออกมาได้อย่างไงครับ

System.IO.Directory.GetFiles("", "*.*", IO.SearchOption.AllDirectories)

  Dim di As New IO.DirectoryInfo("c:\")
    Dim diar1 As IO.FileInfo() = di.GetFiles()
    Dim dra As IO.FileInfo

   'list the names of all files in the specified directory
    For Each dra In diar1
        'ListBox1.Items.Add(dra)
    Next