Question

VB如何筛选listview里的内容

VB如何筛选listview里的内容，比如我有一个text和一个listview，listview加入有以下数据：（有两列）
问题 答案
我爱你 我也爱你
我恨你 我也恨你
哈哈 嘻嘻
然后我就在text1里输入 哈哈 ， listview就只显示 哈哈 嘻嘻，然后比如再输入 水果，因为没有这个 所以listview显示为空，然后text为空后，两列又显示出来。

Answer 1

也就是查找LISTVIEW控件中指定的字符串吧.

Private Sub ListView2_Click()
On Error GoTo ONERROR
Dim strFindMe As String

strFindMe = ListView2.ListItems(ListView2.SelectedItem.Index).Text 获取选定行的第一列的文本

FindItem 方法返回找到的项目的引用，所以必须创建对象变量并将找到的项目设置给它。
Dim itmFound As ListItem “FoundItem 变量”

Set itmFound = ListView1.FindItem(strFindMe, lvwText, , lvwPartial)

若未找到符合条件的 ListItem 则通知用户并退出。如果找到 ListItem，则使用 EnsureVisible 方法滚动控件，并选定 ListItem。
If itmFound Is Nothing Then 若没有匹配成功，则通知用户并退出。
MsgBox "No match found"
Else
itmFound.EnsureVisible 滚动 ListView 以显示找到的 ListItem。
itmFound.Selected = True 选定ListItem。
ListView1.SetFocus 将焦点返回给控件以查看选择。
End If
Set itmFound = Nothing
ONERROR:
If Err.Number <> 0 Then
Select Case Err.Number
Case Else
MsgBox "错误代码：" & Err.Number & " 错误描述：" & Err.Description, vbExclamation, App.ExeName
Resume Next
End Select
End If
End Sub

Answer 2

你这样是不可能实现的,你的这个lv类似一个dbgrid,提供查询用，不能实现动态展示的，不过你可以把这个lv隐藏起来，再新建一个lv,用来展示，就能达到你的目的了

追问

怎样实现

追答

就是从隐藏的lv里查询嘛，查到了就在lv2里显示，没查到就不显示，每次查询前把lv清空就行了