LINQのクエリ例外/エラー

Question

以下は、私がコースのリストを達成するために取得するコードです。しかし、私は、LINQとコードで同じことをしようとしようとしています：

Result.AddRange(From k As WorkMateLib.CourseNameSpace.CoursesLib.Category In Courses.CoursesOfferedMAIN.Values Where Not k.CategoryName = "" Select k.Courses.Values.ToList()) 

しかし、次のようにエラーを投げている：

タイプ 「WhereSelectEnumerableIterator 2[WorkMateLib.CourseNameSpace.CoursesLib+Category,System.Collections.Generic.List 1のオブジェクトをキャストすることができません[ WorkMateLib.CourseNameSpace.CoursesLib + Course]] ' を入力して ' System.Collections.Generic.IEnumerable`1 [WorkMateLib.CourseNameSpace.CoursesLib + Course] 'と入力します。

お願いします。よろしくお願いいたします。ありがとうございました。

Answer 1

これは同等である必要があります。自分でリストを作成する必要はありません。

Dim Result = Courses.CoursesOfferedMAIN.Values     _ 
        .SelectMany(Function(cat) cat.Courses.Values) _ 
        .ToList