<channel>
<title>TEXT</title>
<beschreibung>TEXT</beschreibung>
<link>URL</link>
[Ein paar Elemente dich ich nicht lesen will]
<item>
<titel>TEXT</titel>
<subtitel>TEXT</subtitel>
<link>URL</link>
</item>
 
<item>
<titel>TEXT</titel>
<subtitel>TEXT</subtitel>
<link>URL</link>
</item>
[Und die Items noch ein paar mal]
</channel>

'read the xml declaration and advance to channel tag
 xmlRead.Read()
'read channel tag
        xmlRead.Read()
 
        While Not xmlRead.EOF
            'Go to the titel tag
            xmlRead.Read()
            'if not start element exit while loop
            If Not xmlRead.IsStartElement() Then
                xmlRead.MoveToElement()
            End If
 
            'Read elements 
            xmlRead.Read()
            'Get the firstName Element Value
            Dim strTitel = xmlRead.ReadElementString("title")
            'Get the lastName Element Value
            Dim strLink = xmlRead.ReadElementString("link")
            'Write Result to the Console
            frm_RssReader.lblTitle.Text = strTitel
            frm_RssReader.lblLink.Text = strLink
        End While
        'close the reader
        xmlRead.Close()