Aggregate 句でエラーになる (ID:148039)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 配列だとＯＫでコレクションだとエラーが出ます。 一行で平均などを求められるので便利と思いました。 どう書けば良いのでしょうか？。Vb2010。 エラー内容は↓ メソッド 'Average' の定義には、このコンテキストではアクセスできません。 この引数の数を受け付ける 'Average' がないため、オーバーロードの解決に失敗しました。 ------ Private Sub hoge() Handles Button1.Click Dim Test_Arr() As Double = {1.5, 2.3, 4.5, 2.3, 1.2} Dim Test_Lst As New ArrayList Test_Lst.Add(3.125) Test_Lst.Add(1.9225) Test_Lst.Add(4.855) Test_Lst.Add(2.65) Test_Lst.Add(4.25) Dim av As Double av = Aggregate s In Test_Arr Into Average() av = Aggregate s In Test_Lst Into Average() '←エラーになる MsgBox(av.ToString) End Sub