Option Strict On
Option Explicit On 
Imports System.Xml.Serialization

Public Class rss
    <XmlElementAttribute("channel")> _
    Public channel As New rssChannel()
    <XmlAttributeAttribute("version")> _
    Public version As String = "2.0"
End Class

Public Class rssChannel
    Public title As String
    Public link As String
    Public description As String
    Public language As String = "en-us"
    <XmlElementAttribute("item")> _
    Public item As New rssChannelItems()
End Class

Public Class rssChannelItems
    Inherits CollectionBase

    Public Sub Add(ByVal Item As rssChannelItem)
        Dim I As Integer = List.Add(Item)
    End Sub

    Default Public ReadOnly Property Item(ByVal Index As Integer) As rssChannelItem
        Get
            Return CType(List.Item(Index), rssChannelItem)
        End Get
    End Property
End Class

Public Class rssChannelItem
    Public title As String
    Public description As String
    Public link As String
    Public pubDate As String
End Class