filtrering objekt i en " ListBox " kontroll i Visual Basic.NET ( VB.NET ) Ansökan kan åstadkommas med hjälp av en " ComboBox " och en " ListBox " klass . En " listruta " kontroll kan du visa en lista över objekt för användaren att användaren kan välja genom att klicka . Den " listruta " kontrollen ger inte en filtrering mekanism , därför måste du filtrera objekten med hjälp av en " ListBox " klass och loopa igenom de objekt som du vill filtrera . Du kan visa filtrera objekt med en " ComboBox " kontroll . A " ComboBox " kontroll är en kombination av en textruta och en listruta kontroll. Saker du behöver
Microsoft Visual Studio
Visa fler instruktioner
1
Launch Microsoft Visual Studio , klicka på " Nytt projekt " från den vänstra rutan på din datorskärm och expandera " Visual Basic " nedan " Installerade mallar . " Klicka på " Windows " och dubbelklicka på " Windows Forms Application " från mitten av dialogrutan för att skapa ett nytt projekt .
2
Dubbelklicka på " ListBox " för att lägga till en ny kontroll listrutan till formuläret . Dubbelklicka på " ComboBox " för att lägga till en ny kombinationsruta i formuläret .
3
Dubbelklicka på formuläret för att skapa en händelse formulär belastning och lägg till följande kod i händelsen att befolka den " ListBox " och " ComboBox " med
4
Kopiera och klistra in följande kod nedanför lasten händelsen för att skapa nya sub procedur för att befolka " ListBox : "
Private Sub populateListBox ( ) katalog
Me.ListBox1 . Items.Clear ( ) katalog
Me.ListBox1.Items.Add ( " Car - Civic " ) katalog
Me.ListBox1.Items.Add ( " Car - Lexus IS250 " ) katalog
Me.ListBox1.Items.Add ( " Truck - Tundra " ) katalog
Me.ListBox1.Items.Add ( " Truck - Silverado " ) katalog
Me.ListBox1.Items.Add ( " Motorcycle - Kawasaki " ) katalog
Me.ListBox1.Items.Add ( " Motorcycle - Ninja " ) katalog
Me.ListBox1.Items.Add ( " Motorcycle - Susuki " ) katalog
Me.ListBox1.Items.Add ( " Truck - blixt" ) katalog
Me.ListBox1.Items.Add ( " Truck - F150 " ) katalog
End Sub
5
Växla tillbaka till formuläret och dubbelklicka på " ComboBox " kontroll för att skapa en " SelectedIndexChanged " händelse . Kopiera och klistra in följande kod i händelsen för att välja " ListBox : "
p Om Trim ( ComboBox1.Text ) = " ALL " Då
populateListBox ( ) katalog
Else
populateListBox ( ) katalog
Dim tmpLst Som ListBox = Ny ListBox
Dim s As Integer = 0
För s = 0 att ListBox1.Items.Count - en
p Om InStr ( ListBox1.Items (er) ToString , ComboBox1.Text . ) Then
tmpLst.Items.Add ( ListBox1.Items (er) ) katalog
End If
Nästa
ListBox1.Items.Clear ( ) katalog
För s = 0 att tmpLst.Items.Count - 1
ListBox1.Items . Lägg ( tmpLst.Items (s ) . ToString ) katalog
Nästa
tmpLst.Dispose ( ) katalog
End If
6
Tryck " F5 " för att köra programmet och välja ett alternativ från " ComboBox " kontroll för att filtrera poster i " ListBox . " Addera
