兄弟们好，有个Listview控件问题请教，多谢

Question

我的意思是当把数据加入到Listview中后，由于数据太多没有办法一下子找到，想在文本框中输入一个值，然后查找它，控件中有时就直接选中它，多谢了

Answer 1

用Listview的FindItem（string)就可以

Answer 2

在窗体上加上三个控件：ListView1，Text1，Command1窗体代码：Private Sub Form_Load()
    ListView1.View = lvwList
    With ListView1
        .ListItems.Add Key:="key1", Text:="txg"
        .ListItems.Add Key:="key2", Text:="ygw"
        .ListItems.Add Key:="key3", Text:="gjj"
        .ListItems.Add Key:="key4", Text:="Tom"
        .ListItems.Add Key:="key5", Text:="John"
        .ListItems.Add Key:="key6", Text:="google"
    End With
End Sub
     
Private Sub Command1_Click()
    Dim itm As ListItem
    With ListView1
        Set itm = .FindItem(Text1.Text, lvwText, , lvwPartial)
        If Not itm Is Nothing Then
           .ListItems(itm.Index).Selected = True
           .SetFocus
        End If
    End With
    Set itm = Nothing
End Sub在文本框中输入gjj，点击Command1，看看效果

Answer 3

lvwSubItem 代替 lvwText 则表示在子项搜索lvwWholeWord: 整个字符串匹配
  lvwPartial: 部分匹配