Bij het omgaan met arrays in Visual Basic ( VB ) is het belangrijk om te begrijpen hoe de array om specifieke items te vinden doorzoeken. Een array is een lijst met bestelde objecten , zoals strings of integers . Een array kan waarden zoals namen medewerkers ' , een lijst met nummers of zelfs zinnen uit een boek te slaan . Het vinden van een item in een array omvat het maken van een lus te doorlopen de array -elementen en een vergelijking te controleren of het item dat overeenkomt met wat u zoekt . Instructies
1 Open uw VB bronbestand in een editor zoals Microsoft Visual Basic . Kopen van 2 Verklaren een array van strings en het met waarden door het toevoegen van de volgende code in uw functie : Dim myArray
( ) As String = { " groen " , " blue " , " geel " }
Als alternatief kunt u een array van integers te maken met de code : < br Dim myArray > ( ) As Integer = { 11 , 24 , 12 }
Loop 3 door de array en zoeken naar alle elementen die overeenkomen met de tekenreeks die u zoekt door het toevoegen van de code : Dim searchItem
As String = " blue " Dim index
zo lang
index = LBound ( myArray ) Om UBound ( myArray ) op Als ( String.Compare ( myArray ( index ) , searchItem ) = 0 ) MsgBox dan
( " Gevonden : " + searchItem + " op index : " + CStr ( index ) ) op Volgende
de " LBound " en " UBound " functies bepalen het begin en het einde van de array , zodat u niet hoeft te code in nummers die later zou kunnen veranderen . Binnen de " voor volgend " loop kijkt het of elk item in de array is gelijk aan de zoekterm , en zo ja, het toont een bericht waaruit blijkt welke reeksindex de waarde heeft . De functie " CStr " converteert een getal in een string voor de weergave . Met behulp van het voorbeeld , zal een bericht pop-up tonen " Gevonden : blauw bij Index : . 1 " Als alternatief kunt u een array van integers zoeken met de code : Dim searchItem
als Integer = 12 Dim index
zo lang
index = LBound ( myArray ) Om UBound ( myArray ) op Als ( myArray ( index ) = searchItem ) MsgBox dan
( " Gevonden : " + Cstr ( searchItem ) + " op index : " + CStr ( index ) ) < br > Volgende
4 Sla het VB- bestand , compileren en uitvoeren van uw programma om de array zoeken naar passende punten .
|
