2

カスタム オブジェクトの一般的なリストがあり、そのリストを特定のプロパティ値が除外リストに含まれていないオブジェクトに減らしたいと考えています。

私は次のことを試しました：

Private Sub LoadAddIns()
  // Get add-in templates
  Dim addIns = GetTemplates(TemplateTypes.AddIn)
  // Get the current document
  Dim sectionId As String = CStr(Request.QueryString("sectionId"))
  Dim docId As Integer = CInt(Split(sectionId, ":")(0))
  Dim manual = GetTempManual(docId)
  Dim content As XElement = manual.ManualContent
  // Find which templates have been used to create this document.
  Dim usedTemplates = (From t In content.<header>.<templates>.<template> _
                       Select CInt(t.<id>.Value)).ToList
  // Exclude add-ins that have already been used.
  If usedTemplates IsNot Nothing Then
    addIns = addIns.Where(Function(a) usedTemplates.Contains(a.TemplateID) = False)
  End If
  // Bind available add-ins to dropdown
  With ddlAddIns
    .DataSource = addIns
    .DataTextField = "Title"
    .DataValueField = "TemplateID"
    .DataBind()
    .Items.Insert(0, New ListItem("[select an add-in]", 0))
  End With
End Sub

しかし、エラーが発生します:

System.InvalidCastException: タイプ 'WhereListIterator 1[MyApp.Classes.Data.Entities.Template]' to type 'System.Collections.Generic.List1 [MyApp.Classes.Data.Entities.Template]' のオブジェクトをキャストできません。

テンプレート ID が除外リストにないテンプレートのみを選択するにはどうすればよいですか?

4

1 に答える 1

5

ToList() 拡張機能を Where 拡張機能の末尾に追加して、適切なタイプのリストに変換します。

If usedTemplates IsNot Nothing Then
    addIns = addIns.Where(Function(a) usedTemplates.Contains(a.TemplateID) = False) _
                   .ToList()
End If
于 2009-04-24T15:05:59.260 に答える