Come fare filtraggio in un ListBox in VB.NET

March 12

Come fare filtraggio in un ListBox in VB.NET


elementi filtranti in un controllo "ListBox" in Visual Basic.NET applicazione (VB.NET) può essere realizzato utilizzando un "ComboBox" e una classe "ListBox". Un controllo "ListBox" consente di visualizzare un elenco di elementi per l'utente che l'utente può selezionare facendo clic. Il controllo "ListBox" non fornisce un meccanismo di filtro, quindi, è necessario filtrare gli elementi utilizzando una classe "ListBox" e scorrendo gli elementi che si desidera filtrare. È possibile visualizzare gli elementi di filtraggio utilizzando un controllo "ComboBox". Un controllo "ComboBox" è una combinazione di una casella di testo e un controllo casella di riepilogo.

istruzione

1 Avviare Microsoft Visual Studio, fare clic su "New Project" dal riquadro sinistro dello schermo del computer ed espandere "Visual Basic" sotto "Modelli installati." Fai clic su "Windows" e fare doppio clic su "Applicazione Windows Form" dal centro della finestra di dialogo per creare un nuovo progetto.

2 Fare doppio clic su "ListBox" per aggiungere un nuovo controllo casella di riepilogo al form. Fare doppio clic su "ComboBox" per aggiungere una nuova casella combinata al form.

3 Fare doppio clic sul form per creare un evento carico di modulo e aggiungere il seguente codice all'interno della manifestazione per popolare il "ListBox" e la "ComboBox" con i dati:

Me.ComboBox1.Items.Add ( "ALL")

Me.ComboBox1.Items.Add("Car")

Me.ComboBox1.Items.Add ( "Truck")

Me.ComboBox1.Items.Add ( "moto")

PopulateListBox ()

4 Copiare e incollare il seguente codice sotto l'evento carico di creare nuova procedura secondaria per popolare il "ListBox:"

Private Sub PopulateListBox ()

Me.ListBox1.Items.Clear()

Me.ListBox1.Items.Add ( "Car - Civico")

Me.ListBox1.Items.Add ( "Car - Lexus IS250")

Me.ListBox1.Items.Add ( "Truck - Tundra")

Me.ListBox1.Items.Add ( "Truck - Silverado")

Me.ListBox1.Items.Add ( "Moto - Kawasaki")

Me.ListBox1.Items.Add ( "Moto - Ninja")

Me.ListBox1.Items.Add ( "Moto - Susuki")

Me.ListBox1.Items.Add ( "Truck - Lightning")

Me.ListBox1.Items.Add ( "Truck - F150")

End Sub

5 Tornare al form e fare doppio clic sul controllo "ComboBox" per creare un evento "SelectedIndexChanged". Copiare e incollare il seguente codice all'interno della manifestazione per filtrare il "ListBox:"

If Trim(ComboBox1.Text) = "ALL" Then

PopulateListBox ()

Altro

PopulateListBox ()

Dim tmpLst Come ListBox = Nuovo ListBox

s fiochi come Integer = 0

Per s = 0 Per ListBox1.Items.Count - 1

If InStr (ListBox1.Items (s) .ToString, ComboBox1.Text) allora

tmpLst.Items.Add (ListBox1.Items (s))

Finisci se

Il prossimo

ListBox1.Items.Clear ()

Per s = 0 Per tmpLst.Items.Count - 1

ListBox1.Items.Add (tmpLst.Items (s) .ToString)

Il prossimo

tmpLst.Dispose ()

Finisci se

6 Premere il tasto "F5" per eseguire il programma e selezionare una voce dal controllo "ComboBox" per filtrare gli elementi nel "ListBox".