Come determinare se un elemento esiste in VB Array

June 6

Quando si tratta di matrici in Visual Basic (VB) è importante capire come cercare la matrice per trovare elementi specifici. Un array è un elenco di oggetti ordinati, come stringhe o interi. Un array può memorizzare valori quali nomi dei dipendenti, un elenco di numeri o anche frasi da un libro. Trovare un elemento in un array comporta la creazione di un ciclo per scorrere gli elementi dell'array e un controllo confronto per vedere se l'oggetto corrisponde a quello che si sta cercando.

istruzione

1 Aprire il file sorgente VB in un editor come Microsoft Visual Basic.

2 Dichiarare un array di stringhe e inizializzare con i valori aggiungendo il seguente codice nella funzione:

myArray Dim () As String = { "verde", "blu", "giallo"}

In alternativa, è possibile creare un array di interi con il codice:

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

3 Loop attraverso l'array e ricerca di tutti gli elementi che corrispondono con la stringa che si sta cercando aggiungendo il codice:

Dim searchItem As String = "blue"

Indice Dim come lungo

Per index = LBound (myArray) Per UBound (myArray)

If (String.Compare(myArray(index),searchItem)=0) Then

MsgBox ( "Trovato:" + searchItem + "in Index:" + CStr (indice))

Il prossimo

Il "LBound" e funzioni "UBound" determinare l'inizio e la fine della matrice in modo da non dover codificare nei numeri che potrebbero cambiare in seguito. All'interno del "per il prossimo" loop controlla se ogni elemento della matrice è pari a tema, e in tal caso viene visualizzata una finestra di rappresentazione del messaggio cui indice di array ha il valore. La funzione "CStr" converte un numero in una stringa per la visualizzazione. Utilizzando l'esempio, una finestra di messaggio pop-up che visualizza "Trovato: blu a Indice: 1." In alternativa, è possibile cercare un array di interi con il codice:

Dim searchItem as Integer = 12

Indice Dim come lungo

Per index = LBound (myArray) Per UBound (myArray)

If (myArray(index) = searchItem) Then

MsgBox ( "Trovato:" + Cstr (searchItem) + "in Index:" + CStr (indice))

Il prossimo

4 Salvare il file VB, compilare ed eseguire il programma per cercare la matrice per la corrispondenza articoli.