Ako zistiť , či položka existuje vo VB Array

Pokiaľ sa jedná o pole v jazyku Visual Basic ( VB ) , je dôležité pochopiť , ako vyhľadávať pole nájsť konkrétne položky . Pole je zoznam objednaných predmetov , ako sú reťazce alebo celé čísla . Pole môže obsahovať hodnoty , ako sú mená zamestnancov , zoznam čísel alebo dokonca viet z knihy . Vyhľadanie položky v poli zahŕňa vytvorenie slučky iterovat prvky poľa a kontrolu porovnanie, či tovar zodpovedá tomu , čo hľadáte . Pokyny dovolená 1

Otvorte zdrojový VB súbor v editore , ako je napríklad Microsoft Visual Basic .
2

deklarovať pole reťazcov a inicializovať s hodnotami pridaním nasledujúceho kódu vo svojej funkcii :

Dim myArray ( ) As String = { " zelená " , " modrá " , " žltá " }

Prípadne môžete vytvoriť pole celých čísel s kódom :

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

slučku cez pole a hľadať pre všetky prvky , ktoré zodpovedajú reťazec , ktorý hľadáte podľa pridanie kódu :

Dim searchItem As String = " blue "

Dim index ako Long

index = LBound ( myArray ) Pre UBound ( myArray )

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

MsgBox ( " Nájdené: " + searchItem + " na index " + CStr ( index ) )

Ďalšie

" LBound " a funkcia " UBound " stanoviť začiatok a koniec poľa , takže nemusíte kód v počtoch , ktoré by mohli zmeniť neskôr . Vnútri " pre ďalšiu " slučky je kontroluje , či niektorá položka v poli je rovná položke hľadanie , a ak áno , zobrazí sa okno so správou s údajmi , ktoré index poľa má hodnotu . Funkcia " CStr " prevedie číslo na reťazec pre zobrazenie . Ak použijeme príklad , bude okno so správou pop - up zobrazení " nájdené: modrá na Index : . 1 " Prípadne môžete vyhľadávať pole celých čísel s kódom :

Dim searchItem ako Integer = 12

Dim index tak dlho ,

index = LBound ( myArray ) Do UBound ( myArray )

( myArray ( index ) = searchItem ) Potom

MsgBox ( " Nájdené: " + CStr ( searchItem ) + " na index " + CStr ( index ) )

Ďalšie
4

Uložte súbor VB , skompilovať a spustiť program pre vyhľadávanie na pole pre zodpovedajúce položky.

• Predchádzajúca strana: Ako čas VBA funkcie 
• Ďalšia strana: Ako previesť desatinné číslo na reťazec vo VB.NET