Le langage de programmation Visual Basic de Microsoft a une boîte à outils robuste pour la création d'applications Windows Form en peu de temps et avec une relative facilité. Le contrôle ListBox est un de ces outils , l'utiliser pour donner à vos utilisateurs un certain nombre de choix à choisir. Il est même possible pour permettre à l'utilisateur d' ajouter ou de supprimer à partir du contenu d'une zone de liste , et pour ce faire, vous devez être en mesure de rechercher la zone de liste à agir sur l'élément approprié . Instructions
1

Cliquez sur " Démarrer", " Tous les programmes " et sélectionnez le Microsoft Visual Studio ou une application Visual Basic Express , en fonction de celui que vous avez installé .
2

cliquez sur le lien « Nouveau projet » sur la page Visual Studio Démarrer, sélectionnez "Application Windows Forms " et cliquez sur "OK". Cela ouvre un nouveau formulaire vierge dans la fenêtre de conception .
3

Cliquez sur l'onglet " Outils " à gauche de l'écran pour le développer. Double -cliquez sur le contrôle " ListBox " . Double -cliquez sur la commande "Button" et double-cliquez sur la commande " zone de texte " . Cela ajoute un de chaque à votre formulaire. Cliquez dans la fenêtre de conception pour réduire la Boîte à outils.
4

Cliquez sur la zone de liste dans le formulaire. Faites défiler jusqu'à la "Articles " propriété dans les fenêtres Propriétés au bas à gauche de votre écran . Cliquez sur la case de suspension pour ouvrir une fenêtre de saisie des articles . Entrez plusieurs éléments de la liste , en appuyant sur "Entrée" après chaque point de les placer sur des lignes séparées .
5

Double -cliquez sur le bouton pour ouvrir la fenêtre de code VB . Votre curseur apparaît entre les lignes qui ressemblent à ceci :

Private Sub Button1_Click ( expéditeur de ByVal comme System.Object , ByVal e As System.EventArgs )

Poignées Button1.Click

End Sub

Placez le code suivant entre les lignes ci-dessus pour consulter la liste pour un duplicata de ce que l'utilisateur entre dans le champ de texte:
< p> '

' commentaire - le code des recherches sur la zone de liste pour un duplicata de ce que l'utilisateur calé

»dans la zone de texte

'

ListItemCounter Dim As Integer

Si TextBox1.Text > rien, alors

faire jusqu'à ListItemCounter = ListBox1.Items.Count ()

Si TextBox1.Text.ToUpper = ( ListBox1.Items ( ListItemCounter ) ) . ToUpper () Alors

MessageBox.Show (" doublon trouvé" )

Return of

Else

ListItemCounter + = 1

End If

boucle

MessageBox.Show (" l'article que vous avez entré n'est pas dans la liste" )

End If

ce code cherche à travers les éléments de la ListBox pour l'élément qui a été entré dans la zone de texte . Notez la méthode " ToUpper " joint de sorte que la comparaison élimine cas comme un problème potentiel . Si l'élément est trouvé , un message approprié est délivré , si l'article n'est pas trouvé, un " pas trouvé " un message est émis
6

Cliquez sur le menu " Debug" au sommet de l' . écran et cliquez sur le lien " Démarrer le débogage " . Cela ouvre votre application en mode test. Entrez un élément qui est dans la liste dans la zone de texte et cliquez sur le bouton . Vous devriez voir le message " doublon " . Entrez un élément dans la zone de texte qui n'est pas dans la liste et cliquez sur le bouton . Maintenant, vous devriez voir le " point introuvable" message.