Quando si tratta con gli array in Visual Basic ( VB) è importante capire come cercare l'array per trovare elementi specifici . Un array è una lista di oggetti ordinati, come le stringhe o interi . Un array può memorizzare valori come i nomi dei dipendenti , una lista di numeri o anche frasi da un libro . Ricerca di un elemento in un array comporta la creazione di un ciclo per scorrere gli elementi di matrice e di un confronto controllare per vedere se la voce corrisponde a quello che stai cercando. Istruzioni
1

Aprire il file di origine 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 :

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

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

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

scorrere la matrice e la ricerca di tutti gli elementi che corrispondono alla stringa che si sta cercando di aggiungendo il codice :

Dim searchItem As String = "blue "

indice Dim come Long

index = LBound ( myArray ) a UBound ( myArray ) per < p > Se ( String.Compare ( myArray (indice ) , searchItem ) = 0) allora

MsgBox ( " Trovato : " + searchItem + " a indice : " + CStr ( index) ) per < p > Avanti

funzioni " UBound " " LBound " e determinare l'inizio e la fine della matrice in modo da non dover codice in numeri che potrebbero cambiare in seguito. All'interno del " per il prossimo " ciclo controlla se ogni elemento dell'array è uguale alla voce di ricerca , e in tal caso viene visualizzata una finestra di messaggio che indica quali indici di campo ha il valore . La funzione " CStr " converte un numero in una stringa per la visualizzazione . Utilizzando l'esempio , una finestra di messaggio si aprirà visualizzando " Trovato : blu Indice : 1." In alternativa , è possibile cercare una matrice di interi con il codice :

Dim searchItem as Integer = 12

indice Dim come Long

index = LBound ( myArray ) To UBound ( myArray ) per

( myArray (indice ) = searchItem ) Poi

MsgBox ( " Trovato : " + CStr ( searchItem ) + " a indice : " + CStr ( index ) ) < br >

Avanti
4

Salvare il file VB , compilare ed eseguire il programma per cercare la matrice di elementi corrispondenti .