[السرور]

تفض اخوي

PHP كود :

       Dim sourceStringLines() As String =  IO.File.ReadAllLines("file.txt")

        For Each line As String In sourceStringLines
            Dim spt() As String = line.Trim.Split
            ListBox1.Items.Add(spt(0))
            ListBox2.Items.Add(spt(1))
            ListBox3.Items.Add(spt(2))
        Next