Filtrando itens em um controle " ListBox " em seu Visual Basic.NET aplicação ( VB.NET ) pode ser feito usando uma " caixa de combinação " e uma classe " ListBox " . Um controle " ListBox " permite exibir uma lista de itens para o usuário que o usuário pode selecionar clicando . O controle " ListBox " não fornece um mecanismo de filtragem , portanto, você precisa filtrar os itens usando uma classe " ListBox " e looping através dos itens que você deseja filtrar . Você pode exibir os itens de filtragem usando um controle " ComboBox " . Um controle " ComboBox " é uma combinação de uma caixa de texto e um controle de caixa de listagem . Coisas que você precisa 
 Microsoft Visual Studio 
 Show Mais instruções 
 1 
 Abra o Microsoft Visual Studio , clique em " New Project" no painel esquerdo da tela do computador e expandir " Visual Basic" abaixo " modelos instalados ". Clique em " Windows" e clique duas vezes no centro da janela de diálogo para criar um novo projeto "Windows Forms Application " . 
 2 
 duplo clique em " ListBox " para adicionar um novo controle de caixa de lista para sua forma. Clique duas vezes em " ComboBox " para adicionar uma nova caixa de combinação para seu formulário. 
 3 
 Clique duas vezes no formulário para criar um evento de carregamento de formulário e adicione o seguinte código dentro do evento para preencher a " caixa de listagem " e " Caixa de Combinação ", com 
 4 
 Copiar e colar o seguinte código abaixo o evento de carregamento para criar novo procedimento sub para preencher o " ListBox : " 
 
 Private Sub PopulateListBox () 
 
 Me.ListBox1 . Items.Clear () 
 
 Me.ListBox1.Items.Add ( "Car - Civic " ) 
 
 Me.ListBox1.Items.Add ( "Carro - Lexus IS250 " ) 
 
 Me.ListBox1.Items.Add ( " Truck - Tundra " ) 
 
 Me.ListBox1.Items.Add ( " Truck - Silverado " ) 
 
 Me.ListBox1.Items.Add ( " Motorcycle - Kawasaki " ) 
 
 Me.ListBox1.Items.Add ( "Motorcycle - Ninja " ) 
 
 Me.ListBox1.Items.Add ( " Motorcycle - Susuki " ) 
 
 Me.ListBox1.Items.Add ( " Truck - Lightning" ) 
 
 Me.ListBox1.Items.Add ( " Truck - F150 " ) 
 
 End Sub 
 5 
 Volte ao seu formulário e dê um duplo clique no controle " ComboBox " para criar um evento " SelectedIndexChanged " . Copie e cole o seguinte código dentro do evento para filtrar a " caixa de listagem : " 
 
 Se Trim ( ComboBox1.Text ) = "ALL" Então 
 
 PopulateListBox () 
 
 Else 
 
 PopulateListBox () 
 
 Dim tmpLst Como ListBox = New ListBox 
 
 Dim s As Integer = 0 
 
 Para s = 0 To ListBox1.Items.Count - 1 
 
 Se Instr ( ListBox1.Items (s) ToString , ComboBox1.Text . ) Então 
 
 tmpLst.Items.Add ( ListBox1.Items (s ) ) 
 
 End If 
 
 Próxima 
 
 ListBox1.Items.Clear () 
 
 Para s = 0 To tmpLst.Items.Count - 1 
 
 ListBox1.Items . Adicionar ( tmpLst.Items (S). ToString ) 
 
 Próxima 
 
 tmpLst.Dispose () 
 
 End If 
 6 
 Pressione F5 " "para executar o programa e escolher um item da " caixa de combinação " controle para filtrar itens na " caixa de listagem. "