Create GetDataFromFiles.vb