lancio di Microsoft Visual Studio , fare clic su " Nuovo Progetto" dal riquadro sinistro dello schermo del computer ed espandere " Visual Basic " sotto " Installed Templates ". Fare clic su " Windows" e fare doppio clic su " Applicazione Windows Form " dal centro della finestra di dialogo per creare un nuovo progetto .
2
doppio clic su " ListBox " per aggiungere un nuovo controllo casella di riepilogo per il modulo. Fare doppio clic su " ComboBox " per aggiungere una nuova casella combinata al form.
3 Fare doppio clic sul form per creare un evento di caricamento form e aggiungere il seguente codice all'interno dell'evento per popolare la " ListBox " e il " ComboBox " con
4
Copia e incolla il codice riportato di seguito l'evento carico di creare nuova procedura sub per popolare la " ListBox : "
Private Sub PopulateListBox ( ) per
Me.ListBox1 . Items.Clear ( ) per
Me.ListBox1.Items.Add ( " Car - Civico " ) per
Me.ListBox1.Items.Add ( " auto - Lexus IS250 " ) per
Me.ListBox1.Items.Add ( "Truck - Tundra " ) per
Me.ListBox1.Items.Add ( "Truck - Silverado " ) per
Me.ListBox1.Items.Add ( " Moto - Kawasaki " ) per
Me.ListBox1.Items.Add ( " Motorcycle - Ninja" ) per
Me.ListBox1.Items.Add ( " Motorcycle - Susuki " ) per
Me.ListBox1.Items.Add ( "Truck - Lightning" ) per
Me.ListBox1.Items.Add ( "Truck - F150 " ) per
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 dell'evento per filtrare il " ListBox : "
Trim ( ComboBox1.Text ) = " ALL" Allora
PopulateListBox ( ) per
Else
PopulateListBox ( ) per
Dim tmpLst Come ListBox = New ListBox
Dim s As Integer = 0
Per s = 0 Per ListBox1.Items.Count - 1
Se InStr ( ListBox1.Items ( s ) ToString , ComboBox1.Text . ) Poi
tmpLst.Items.Add ( ListBox1.Items ( s ) ) per
End If
Avanti
ListBox1.Items.Clear ( ) per
Per s = 0 Per tmpLst.Items.Count - 1
ListBox1.Items . Aggiungi ( tmpLst.Items ( s ) . ToString ) per
Successivo
tmpLst.Dispose ( ) per
End If
6
Premere " F5 "per eseguire il programma e scegliere una voce dal " ComboBox " di controllo per gli elementi filtro nella " ListBox ".
Programmazione © www.354353.com