Filtering items in een " ListBox " control in uw Visual Basic.NET ( VB.NET ) applicatie kan worden bereikt met behulp van een " ComboBox " en een " ListBox " class . Een " ListBox " regelaar kunt u een lijst met items weer te geven aan de gebruiker die de gebruiker kan selecteren door te klikken . De " ListBox " control biedt geen filtering mechanisme , dus je moet de items filteren met behulp van een " ListBox " class en het doorlussen van de items die u wilt filteren . U kunt filteren van items met behulp van een " ComboBox " control weer te geven . Een " ComboBox " controle is een combinatie van een tekstvak en een keuzelijst . Wat je nodig hebt Microsoft Visual Studio Toon Meer Aanwijzingen 1 Lancering Microsoft Visual Studio , klikt u op " New Project" van het linkerpaneel van uw computerscherm en uitbreiden " Visual Basic " onder " Geïnstalleerde sjablonen . " Klik op " Windows " en dubbelklik op " Windows Forms Application " van het centrum van het dialoogvenster om een nieuw project aan te maken . Dubbelklik op " ListBox " 2 naar een nieuwe keuzelijst toe te voegen aan uw formulier . Dubbelklik op " ComboBox " om een nieuwe keuzelijst toe te voegen aan uw formulier . 3 Dubbelklik op het formulier om een formulier load gebeurtenis te maken en voeg de volgende code in de gebeurtenis te bevolken de " ListBox " en de " ComboBox " met Kopieer 4 en plak de volgende code onder de last event om nieuwe sub procedure creëren om de " ListBox : " bevolken Private Sub populateListBox ( ) op Me.ListBox1 . Items.Clear ( ) Me.ListBox1.Items.Add ( " Auto - Civic " ) Me.ListBox1.Items.Add ( " Auto - Lexus IS250 " ) op Me.ListBox1.Items.Add ( " Truck - Tundra " ) Me.ListBox1.Items.Add ( " Truck - Silverado " ) Me.ListBox1.Items.Add ( " Motorfiets - Kawasaki " ) Me.ListBox1.Items.Add ( " Motorcycle - Ninja " ) Me.ListBox1.Items.Add ( " Motorcycle - Susuki " ) op Me.ListBox1.Items.Add ( " Truck - Lightning " ) Me.ListBox1.Items.Add ( " Truck - F150 " ) End Sub 5 Schakel terug naar uw formulier en dubbelklik op het " ComboBox " controle naar een ' SelectedIndexChanged "evenement te creëren . Kopieer en plak de volgende code in de gebeurtenis op de " ListBox : " filteren Als Trim ( ComboBox1.Text ) = " ALL " populateListBox ( ) Dan Else populateListBox ( ) Dim tmpLst Zoals ListBox = New ListBox Dim s As Integer = 0 Voor s = 0 Om ListBox1.Items.Count - 1 Als InStr ( ListBox1.Items ( s ) ToString , ComboBox1.Text . ) dan tmpLst.Items.Add ( ListBox1.Items (s ) ) op end If Volgende ListBox1.Items.Clear ( ) Voor s = 0 Om tmpLst.Items.Count - 1 ListBox1.Items . Voeg ( tmpLst.Items ( s ) . ToString ) Volgende tmpLst.Dispose ( ) End Als Press 6 " F5 "om het programma uit te voeren en kies een item uit de " ComboBox " controle aan filter items in de " ListBox . "
|