またお邪魔します。
LINQ講座第2回のサンプルがうまく動きません。

Dim animals = New String() {"アメンボ", "イノシシ", "ウマ", "エリマキトカゲ", "オオカミ"}

Dim query = From animal In animals Select animal.Length '←変数の名前が違う・・・。 

ListBox1.Items.AddRange(query.Cast(Of String).ToArray) '←ここでInvalidCastExceptionが発生します。 

"型 'System.Int32' のオブジェクトを型 'System.String' にキャストできません。"が表示されて止まってしまいます。