En array är en samling objekt eller variabler som lagras i en sekvens . Ibland måste du korsa en array för att slutföra en uppgift, till exempel sortera array eller söker efter ett visst sökord . I Visual Basic , kan du gå igenom en array ett element i taget med hjälp av ett index variabel , eller korsa hela arrayen med en slinga . Eftersom Visual Basic använder noll - indexering , måste du ta hänsyn till detta när man färdas arrayen för att undvika en out of bounds index fel . Instruktioner
1
Öppna ett nytt Visual Basic-projekt . Dubbelklicka på etiketten kontrollen för att lägga till en till formen . Också lägga till två knappar i formuläret . Öppna kodeditorn
2
Skriv följande rader att deklarera globala variabler : .
Dim objekt () As String = new String ( 4 ) { " första " , " andra " , " tredje " , " fjärde " , " femte " }
Dim arrayIndex As Integer = 0
första raden deklarerar en array med fem element - med index noll till fyra - och initialiserar dem. Den andra förklarar en indexräknaren du kommer att använda med array
3
Öppna " Form1_Load " sub och skriv följande rad : .
Label1.Text = objekt ( arrayIndex ) katalog
Detta visar det första elementet i arrayen på etiketten kontroll
4
Öppna " Button1_Click " sub och ange följande : .
p Om arrayIndex = items.Length - 1 Sen
arrayIndex = 0
Label1.Text = objekt ( arrayIndex ) katalog
Else
arrayIndex + = 1
Label1.Text = objekt ( arrayIndex ) katalog
End If
Denna funktion korsar en matris ett element i taget . Under körning , när du klickar på den här knappen , visas etiketten nästa objekt i arrayen . Om indexet är i sista elementet , går tillbaka till början av arrayen och visar den första posten
5
Öppna " Button2_Click " sub och ange följande : .
för i = 0 till items.Length - 1
MsgBox ( objekt ( i) ) katalog
Nästa
denna slinga korsar hela arrayen från början till slut och visar varje en i en meddelanderuta . Byt funktionen meddelanderutan med något mer praktiskt som utför en uppgift på matrisen .