LINQ to XMLで簡単Twitterクライアント

LINQ to XMLの便利さを再認識しました。

下記コードは私のつぶやきを取得するサンプルですが、LINQ to XMLだと簡単に処理できました。

Imports System.Xml Imports System.Globalization ‌  Public Class frmTest ‌    Private Sub Button1_Click(ByVal sender As System.Object,                ByVal e As System.EventArgs) Handles Button1.Click ‌     Dim TwitterDoc As New XDocument    TwitterDoc =      XDocument.Load("https://twitter.com/statuses/user_timeline/Satohru.xml")    For Each v In TwitterDoc.Descendants("status")        TextBox1.Text += Date.ParseExact(v.Element("created_at").Value,                         "ddd MMM dd HH:mm:ss zzz yyyy",                         CultureInfo.InvariantCulture) & vbCrLf &                         v.Element("text").Value & vbCrLf & vbCrLf    Next ‌    End Sub End Class