Na zelf lang vogelen heb ik het gevonden. Hier is mijn code.
[code]
Dim twitterfeed As New XmlDocument
twitterfeed.Load("http://search.twitter.com/search.rss?q=from:Simlicious")
Dim tweettext As XmlNodeList = twitterfeed.GetElementsByTagName("description")
''3 staat voor x aantal tekens
Tweet1tekst.Text = tweettext(1).InnerText.Substring(0, 3) + "..."
[/code]