如何在vb.Net中使用文本框和列表框进行搜索？

Question

给我代码，其中我可以在文本框中输入一个单词，并且列表框中出现的项目与我在文本框中输入的字符串相同。 请帮我...

Answer 1

我发现通过谷歌，这听起来像的东西类型下面，你想做的事：

1. Autosearch ListBox in VB.NET (WinForms)
2. Search Listboxes as You Type (WinForms or is this VB6?)
3. Searching for items in a ListBox (WPF)

用1号，这里是部分代码：

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    List1.Items.Add("Computer") 
    List1.Items.Add("Screen") 
    List1.Items.Add("Modem") 
    List1.Items.Add("Printer") 
    List1.Items.Add("Scanner") 
    List1.Items.Add("Sound Blaster") 
End Sub 

Private Sub Text1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Text1.TextChanged 
    Dim i As Integer = List1.FindString(Text1.Text) 
    List1.SelectedIndex = i 
    If Text1.Text = "" Then 
     List1.SelectedIndex = -1 
    End If 
End Sub 

Answer 2

想想伪代码，你可以这样做。 从文本框中获取文本。 将一个指针/计数器设置到列表框中，并遍历每个项目直到列表结束。如果文本框的值与listboxitem.text的值相同，那么您已经找到了一个匹配，退出for循环。

Answer 3

添加该代码texboxchange

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged 
    ListBox1.SelectedIndex = ListBox1.FindString(TextBox1.Text.Trim) 
End Sub