this code is for vb.net bt not much diffrence for vb6 you can change it..
Dim sr As StreamReader = New StreamReader("Your File Path")
Dim Arr() As String
Dim line As String
While sr.Read
If sr.EndOfStream Then
Exit While
End If
line = sr.ReadLine
Arr = line.Split(",")
ListView1.Items(0).Text = Arr(0)
ListView1.Items(1).Text = Arr(1)
ListView1.Items(2).Text = Arr(2)
ListView1.Items(3).Text = Arr(3)
End While