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

给我代码，其中我可以在文本框中输入一个单词，并且列表框中出现的项目与我在文本框中输入的字符串相同。请帮我...如何在vb.Net中使用文本框和列表框进行搜索？

2010-11-01 Neel

giv3立方米TH3 koD3s – JonH 2010-11-01 14:51:05

你给我的代码现在！ – 2010-11-01 14:51:52

是的，问题很糟糕，但这个用户是新的，给他一些松懈。 – Matt 2010-11-01 15:05:41

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

用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

来源

2010-11-01 14:53:49 Matt

匿名用户评论：当文本框的所有文本被清除时，选择也应该被清除。在最后一个'End Sub'之前添加如下代码：'If text1.Text =“”Then'（line break）'list1.SelectedIndex = -1'（换行符）'End If'。 – Anne 2011-11-22 19:25:53

@安妮，更新，谢谢。 – Matt 2011-12-13 16:25:02

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

来源

2010-11-01 14:50:33 JonH

比你，但请给我代码.... – Neel 2010-11-01 17:13:36

添加该代码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

来源

2018-01-27 10:17:36

添加解释给你的答案，因为这可以让op和其他人了解解决方案以及 – Muds 2018-01-27 10:52:41

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

回答

相关问题