You don't really need to deal with stream reader:
Public Shared Function GetFeeds(ByVal doc As XmlDocument, ByVal category As String) As String()
If (doc Is Nothing) Then
Throw New ArgumentNullException(NameOf(doc))
End If
Dim node As XmlElement = CType(doc.DocumentElement.SelectSingleNode("//" + category), XmlElement)
If (node IsNot Nothing) Then
Return node.InnerText.Split(New String() { Environment.NewLine }, StringSplitOptions.RemoveEmptyEntries)
Else
Return New String() { }
End If
End Function
Dim doc As XmlDocument = XmlDocument.Load("path\to\your\xml\file")
Dim feeds1 As String() = GetFeeds(doc, "category1")
Dim feeds2 As String() = GetFeeds(doc, "category2")
comboBox1.Items.AddRange(feeds1)
combobox2.Items.AddRange(feeds2)
There may be some mistakes as I used a c# to vb.net converter (I don't write vb.net code anymore), but this is a concise way to get your combobox items from your xml file.