Dim i As Integer
        Dim s As String = ""
        Dim x As Integer
        For i = 1 To newColObj.Count
            s = newColObj.Item(i)
 
            Dim strText = s.Split(";")
 
            ListView1.Items.Add(New ListViewItem(New String() {strText(0), _
              strText(1), strText(2)}))
        Next