2

我尝试在 stackoverflow 上搜索并实现我发现但无济于事的代码。随着文本的更改，我想使用文本框中的当前文本来过滤列表视图项目（因此未关闭匹配的项目将被删除），它只留下列中包含的任何内容。

这是我的意思的一个例子：

搜索：“乔治”

|1|安德森席尔瓦|安德森席尔瓦是...|

|2| 乔治·圣皮埃尔| 乔治是...的冠军

|3| 乔治·索托罗波利斯| Georges Sotoropolis是轻量级拳手|

通过此搜索，只会返回第 2 行和第 3 行。第一行将被省略且不显示。一旦我删除了这些条款，它就会显示出来。

这是我目前拥有的代码：

Private Sub tbSearch_TextChanged(sender As Object, e As System.EventArgs) Handles tbSearch.TextChanged
    lwArticles.BeginUpdate()

    If tbSearch.Text.Trim().Length = 0 Then
        'Clear listview
        lwArticles.Clear()

        'If nothing is in the textbox make all items appear
        For Each item In originalListItems
            lwArticles.Items.Add(item)
        Next
    Else
        'Clear listview
        lwArticles.Clear()

        'Go through each item in the original list and only add the ones which contain the search text
        For Each item In originalListItems
            If item.Text.Contains(tbSearch.Text) Then
                lwArticles.Items.Add(item)
            End If
        Next
    End If
    lwArticles.EndUpdate()

End Sub

它似乎正在工作，但一旦我在 tbSearch 中输入内容，我就看不到列表视图项目。滚动条变小/变大取决于是否由于执行搜索而有更多/更少的项目。我的问题似乎他们不可见

谢谢！

4

3 回答 3

2

我会建议另一种方法 - 首先DataTable根据您的原始项目创建一个。然后创建一个DataView并将其分配为DataSource您的ListView. 现在您可以更改DataView.RowFilter，您的列表将自动更新，因此只有匹配过滤器的项目才会显示。使用这种方法，您不需要每次都从头开始重新创建所有内容，并且您TextChanged变得非常简单和可维护 -如果已经创建RowFilter了相应的内容，它只会更改。DataView

于 2013-01-08T15:45:47.077 回答
2

Listview.Clear 清除项目、列和组。看来您只想清除物品，因此请致电lwArticles.Items.Clear而不是lwArticles.Clear

于 2012-12-19T19:19:08.323 回答
1

这是我的问题的最终答案：

Private originalListItems As New List(Of ListViewItem) 'this gets populated on form load

Private Sub tbSearch_TextChanged(sender As Object, e As System.EventArgs) Handles tbSearch.TextChanged
    lwArticles.BeginUpdate()

    If tbSearch.Text.Trim().Length = 0 Then
        'Clear listview
        lwArticles.Items.Clear()

        'If nothing is in the textbox make all items appear
        For Each item In originalListItems
            lwArticles.Items.Add(item)
        Next
    Else
        'Clear listview
        lwArticles.Items.Clear()

        'Go through each item in the original list and only add the ones which contain the search text
        For Each item In originalListItems
            If item.Text.Contains(tbSearch.Text) Then
                lwArticles.Items.Add(item)
            End If
        Next
    End If

    lwArticles.EndUpdate()
End Sub

感谢 Dan-o 解释 lwArticles.Clear() 将清除所有内容。他通知我我需要 lwArticles.Items.Clear() 来仅清除列表视图中的项目。

于 2012-12-19T19:22:44.720 回答