Change this line
VB Code:
  1. sFileList = Directory.GetFiles(TextBox.Text)
To this
VB Code:
  1. sFileList = File.ReadAllLine(TextBox.Text)