【Orcas】 Visual Studio 2007 【.NET3.0】

このエントリーをはてなブックマークに追加
15デフォルトの名無しさん
XLinqはVBの方が楽だね。(´・ω・)

Option Explicit On
Option Infer On
Option Strict On

Imports System
Imports System.Linq
Imports System.Xml.Linq

Module Test

  Sub Main()
    Dim rss = XDocument.Load("http://www.microsoft.com/japan/msdn/rss.xml")

    Dim q = _
      From item In rss...<item> _
      Order By CType(item.<pubDate>.Value, DateTime) Descending _
      Select item.<title>.Value

    For Each title in q.Take(5)
      Console.WriteLine(title)
    Next
  End Sub

End Module