options de filtrage dans un contrôle " ListBox " dans votre application Visual Basic.NET ( VB.NET ) peuvent être réalisées en utilisant un « ComboBox » et une classe " ListBox " . Un contrôle " ListBox " vous permet d'afficher une liste d'éléments à l'utilisateur que l'utilisateur peut sélectionner en cliquant . Le contrôle " ListBox " ne fournit pas un mécanisme de filtrage , donc vous avez besoin de filtrer les éléments en utilisant une classe " ListBox " et une boucle à travers les éléments que vous souhaitez filtrer . Vous pouvez afficher filtrage éléments à l'aide d'un contrôle " zone de liste déroulante " . Un champ " liste déroulante " est une combinaison d' une zone de texte et une commande de boîte de liste . Choses que vous devez Microsoft Visual Studio Voir Plus Instructions 1 Lancement de Microsoft Visual Studio, cliquez sur " Nouveau Projet" dans le volet de gauche de votre écran d' ordinateur et d'étendre " Visual Basic " en dessous " Modèles installés . " Cliquez sur " Windows" et double-cliquez sur "Application Windows Forms " du centre de la fenêtre de dialogue pour créer un nouveau projet. 2 Double -cliquez sur " ListBox " pour ajouter une nouvelle liste de contrôle de la boîte à votre formulaire. Double -cliquez sur « ComboBox » pour ajouter une nouvelle zone de liste déroulante à votre formulaire. 3 Double- cliquez sur le formulaire pour créer un événement de chargement du formulaire et ajoutez le code suivant dans l'événement pour peupler la " zone de liste " et " zone de liste déroulante " avec Hôtels 4 Copiez et collez le code suivant sous l'événement de chargement de créer un nouveau sous-procédure pour remplir le " ListBox : " Private Sub PopulateListBox () Me.ListBox1 . Items.Clear () Me.ListBox1.Items.Add ( " Auto - Civic ») Me.ListBox1.Items.Add ( " voiture - Lexus IS250 ») < p> 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 " ) < p> Me.ListBox1.Items.Add (« Truck - Lightning" ) Me.ListBox1.Items.Add (« Truck - F150 " ) End Sub 5 revenir à votre forme et double-cliquez sur la commande " zone de liste déroulante " pour créer un événement " SelectedIndexChanged " . Copiez et collez le code suivant dans l'événement pour filtrer le " ListBox : " Si Trim ( ComboBox1.Text ) = "all" PopulateListBox () Alors Else Photos PopulateListBox () tmpLst As ListBox = New ListBox s As Integer = 0 Pour s = 0 To ListBox1.Items.Count - 1 x s'InStr ( ListBox1.Items (s) ToString , ComboBox1.Text . ) Puis tmpLst.Items.Add ( ListBox1.Items (s) ) End If Suivant ListBox1.Items.Clear () Pour s = 0 To tmpLst.Items.Count - 1 x ListBox1.Items . Ajouter ( tmpLst.Items (s) . ToString ) Suivant tmpLst.Dispose () End If 6 Appuyez sur " F5 " pour exécuter le programme et choisir un élément de la " zone de liste déroulante " contrôle de filtrer les éléments de la " zone de liste " .
|