未找到类型“OrderedEnumerable(Of Panel,Integer)”的公共成员“Count”

Question

我使用了下面链接中的 linq 示例。 Going through controls in order

这正是我想要的。它对我有用。谢谢蒂姆·施梅尔特

我添加了一个计时器控件和一些代码。我的问题现在开始。之后，在运行时显示错误。 即使我使用 count 属性删除代码区域，它也不起作用。

未找到类型“OrderedEnumerable(Of Panel,Integer)”的公共成员“Count”。

我已经导入... 导入 System.Linq

谁能帮帮我。我是 vb.net 的新手

    Private Sub InitialisePanels() '(pnl As Control)
    Dim allPanels = From pnl In Me.Controls.OfType(Of Panel)()
               Order By pnl.TabIndex

    'Dim blnControlPresent As Boolean
    For Each pnl As Panel In allPanels
        If pnl.[GetType]().Name = "Panel" Then
            pnl.BringToFront()
            pnl.Visible = True
            pnl.Dock = DockStyle.Fill
            pnl.Visible = False
            pnl.SendToBack()
        End If
    Next
    If allPanels.Count > 0 Then
        allPanels(mFirstPanel).BringToFront()
        allPanels(mFirstPanel).Visible = True
        mCurrentPanel = mFirstPanel
    End If
End Sub

Answer 1

我必须承认我不确定问题出在哪里（除了 allPanels(mFirstPanel) 无法编译，因为 OrderedEnumerable 没有索引器），但这应该可以工作，假设你想带第一个面板到前面：

Private Sub InitialisePanels() '(pnl As Control)
    Dim allPanels = From pnl In Me.Controls.OfType(Of Panel)()
                    Order By pnl.TabIndex    
    For Each pnl As Panel In allPanels
        pnl.BringToFront()
        pnl.Visible = True
        pnl.Dock = DockStyle.Fill
        pnl.Visible = False
        pnl.SendToBack()
    Next

    Dim firstPanel As Panel = allPanels.FirstOrDefault()

    If firstPanel IsNot Nothing Then
        firstPanel.BringToFront()
        firstPanel.Visible = True
        mCurrentPanel = firstPanel
    End If
End Sub