|
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.
|
