| maison  | Hardware  | réseaux  | programmation  | Logiciel  | Dépannage  | systèmes |  
programmation  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Programmation Java

  • Programmation JavaScript

  • PHP /MySQL Programmation

  • programmation Perl

  • Programmation Python

  • Ruby Programming

  • Visual Basics programmation
  •  
    Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
    Comment déterminer si un élément existe en VB Tableau
    Lorsque vous traitez avec des tableaux dans Visual Basic (VB ), il est important de comprendre comment chercher le tableau pour trouver des objets spécifiques. Un tableau est une liste d'objets commandés , tels que des chaînes ou des nombres entiers . Un tableau peut stocker des valeurs telles que les noms des employés , une liste de numéros ou même des peines d'un livre. Trouver un élément dans un tableau consiste à créer une boucle pour parcourir les éléments du tableau et vérifier une comparaison pour voir si le produit correspond à ce que vous recherchez . Instructions
    1

    Ouvrez votre fichier source VB dans un éditeur tel que Microsoft Visual Basic.
    2

    déclarer un tableau de chaînes et d' initialiser des valeurs en ajoutant le code suivant dans votre fonction :

    myArray Dim () As String = {" vert ", " bleu", " jaune "} Sinon, vous pouvez créer un tableau d'entiers avec le code

    :

    myArray Dim ( ) As Integer = { 11, 24, 12}
    3

    parcourir le tableau et la recherche de tous les éléments qui correspondent à la chaîne que vous cherchez en en ajoutant le code suivant:

    searchItem As String =

    index "bleu" As long

    index = LBound ( myArray ) à LimiteSup ( myArray )
    < p> Si ( String.Compare ( myArray (index) , searchItem ) = 0) alors

    MsgBox (" trouvé:" + searchItem + " à l'indice :" + CStr (index) )
    < p > Suivant

    les fonctions " ubound " " LBound " et déterminer le début et la fin du tableau de sorte que vous n'avez pas besoin de code de numéros qui pourraient changer plus tard. A l'intérieur du " prochain pour « boucle , il vérifie si tout élément du tableau est égale au produit de la recherche , et si oui, il affiche une boîte de message pour lesquels index du tableau a la valeur . La fonction " CStr " convertit un nombre en une chaîne pour l'affichage . En utilisant l'exemple , une boîte de message apparaîtra montrant "Résultats: bleu à l'index : 1. " Alternativement, vous pouvez rechercher un tableau d'entiers avec le code:

    searchItem As Integer = 12

    index As Long

    index = LBound ( myArray ) à LimiteSup ( myArray )

    ( myArray (index) = searchItem ) Puis

    MsgBox (" trouvé:" + CStr ( searchItem ) + " à l'indice :" + CStr (index) ) < br >

    Suivant
    4

    Enregistrez le fichier VB, compiler et exécuter votre programme pour consulter la gamme des articles correspondants.

    Previous :

    next :
      articles connexes
    ·Comment se connecter à un SQL Server en utilisant VB N…
    ·Comment créer un raccourci sur le bureau en utilisant …
    ·Options de commande Visual Basic 
    ·Comment ouvrir des fichiers EXE avec Visual Basic 
    ·Comment utiliser Attachments.Add à joindre plusieurs e…
    ·Comment faire pour ajouter un filigrane à BMP Avec VBA…
    ·Comment créer et supprimer l'objet VB6 
    ·Comment utiliser un DataTable en VB.NET 
    ·Date de comparaison dans VBA 
    ·Comment remplir un GridView de données dans SQL VBNET 
      articles en vedette
    ·Comment remplir une cellule après un déroulant Sélec…
    ·Comment faire pour exécuter le programme C dans Visual…
    ·Comment apprendre Java Script 
    ·Comment faire pour convertir des numéros de téléphon…
    ·Comment implémenter plusieurs piles 
    ·Comment faire pour convertir Liberty Basic to EXE 
    ·Comment changer le nom du package dans Eclipse 
    ·Comment changer la police dans System.Windows.Textbox 
    ·Comment faire pour utiliser un fichier PHP externe en H…
    ·Comment faire pour rediriger les utilisateurs mobiles 
    Copyright © Connaissances Informatiques http://fr.wingwit.com