Rss[…] = … (gb.web.feed)

Dim hRss As Rss
Dim hRssItem As RssItem
hRss [ Index As Integer ] = hRssItem

Replace the RssItem at position Index.