[fghj4]

باعتبار ان الموجود في المرفق هو سطر واحد تريد تقسيمه بال(,) على الاعمدة

هذا اذا كان من الرسورس

كود :

For Each t As String In My.Resources.TextFile1.Split(vbNewLine)
   Dim i As New ListViewItem(t.Split(","))
   ListView1.Items.Add(i)
Next

---

وهذا اذا كان من ملف

كود :

For Each t As String In IO.File.ReadAllLines("C:\textfile.txt")
   Dim i As New ListViewItem(t.Split(","))
   ListView1.Items.Add(i)
Next