Private Sub Read_XML()
        Dim XMLReader As Xml.XmlReader
        XMLReader = New Xml.XmlTextReader("List.xml")

    

        While XMLReader.Read
            Select Case XMLReader.NodeType
                Case Xml.XmlNodeType.Element
                    If XMLReader.AttributeCount > 0 Then
                        While XMLReader.MoveToNextAttribute
                            If XMLReader.Name = "File" Then
                            
                                ListView1.Items.Add(XMLReader.Value)

                            ElseIf XMLReader.Name = "Title" Then
                                'how to put title in column(1)????
                                ListView1.Items.Add(XMLReader.Value)



                            Else
                            End If
                        End While
                    End If
            End Select
        End While
        XMLReader.Close()
    End Sub