[Basil Abdallah]

حسب ما فهمت منك انك ترغب بان تقوم باستخراج الاسماء من ملف نصي يكون بنفس مسار البرنامج
استبدل

كود :

  Dim lines() As String = IO.File.ReadAllLines("Names Path")

بـ

كود :

       Dim lines() As String = IO.File.ReadAllLines(My.Application.Info.DirectoryPath & "\Names.TXT")

مع مراعات استبدال Names.txt باسم الملف النصي و وضع هذا الملف النصي بنفس مسار البرنامج