Visual Basic Arrays Tutorial

Microsofts Visual Basic gir enkel erklære og håndtering av enkeltelement variabler, men noen ganger trenger du noe mer, som en tabell over elementer med de samme egenskapene. Det kan være lurt å sløyfe gjennom tabellen utskrift elementene, eller ønsker du kanskje å bygge bordet fra en database. VB.NET letter denne funksjonaliteten ved bruk av matriser, inkludert flerdimensjonale matriser.

Bruksanvisning

1 Begynn Visual Basic og klikk på "New Project" linken på Startsiden. Dobbeltklikk på "Windows Forms Application" for å åpne en ny form i Visual Basic Design vinduet.

2 Rull markøren over fanen Toolbox til venstre for Design vinduet for å åpne verktøykassen menyen. Det kan ta noen sekunder å laste verktøykassa og vise det.

3 Dobbeltklikk på "ListBox" menyen i Common Controls delen av verktøykassen for å legge til en ListBox i skjemaet. Dobbeltklikk på "Button" menyen to ganger for å legge til to knapper i skjemaet. Dobbeltklikk på "TextBox" menyen for å legge til en tekstboks i skjemaet. Dra kontrollene i form til å arrangere Button1 under TextBox og ordne Button2 under ListBox.

4 Dobbeltklikk på "Legg til element" -knappen for å åpne Visual vinduet Basic-kode. Klikk på den tomme linjen under "Public Class Form1" statement øverst i vinduet, og nøkkelen til følgende linje:

Dim ItemArray(9) As String

Dim ArrayCountInteger As Integer

Denne uttalelsen erklærer en rekke opptil ti string-type elementer og et heltall teller. Telleren alltid begynner på null, så "Dim" statement setter tall på ni, én mindre enn antall elementer i tabellen.

5 Klikk på blank linje etter "Private Sub button1_click" statement og skriv inn følgende kode slik at hele prosedyren med begynnelse og slutt linjer ser slik ut:

Private Sub button1_click (ByVal sender As System.Object, ByVal e As System.EventArgs) Håndtak Button1.Click

If TextBox1.Text > "" Then

Hvis ArrayCountInteger = 10 Da

MessageBox.Show ( "du har angitt maksimalt antall elementer")

Komme tilbake

Slutt om

ItemArray (ArrayCountInteger) = TextBox1.Text

ArrayCountInteger + = 1

TextBox1.Clear ()

TextBox1.Focus ()

Slutt om

End Sub

Denne koden leser hvert element som du skriver inn i tekstboksen og setter den inn i matrisen.

6 Vis matrisen. Klikk på fanen Design for å gå tilbake til Design vinduet. Dobbeltklikk på "listeelementer" -knappen for å gå tilbake til koden vinduet. Tast inn koden mellom de to linjene, slik at det endelige resultatet ser slik ut:

Private Sub Button2_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Håndtak Button2.Click

Dim ListArrayCountInteger As Integer

Gjør Mens ListArrayCountInteger & lt; (ArrayCountInteger + 1)

Hvis ItemArray (ListArrayCountInteger)> "" Then

ListBox1.Items.Add (ItemArray (ListArrayCountInteger))

ListArrayCountInteger + = 1

Ellers

MessageBox.Show ( "Ingen flere elementer")

Komme tilbake

Slutt om

Loop

Denne koden leser array ved hjelp av en løkke og plasserer elementer i ListBox for visning.

7 Klikk på "Debug" menyen øverst på skjermen, og klikk på "Start Debugging" linken for å teste programmet. Tast inn et element i tekstboksen og klikk på "Legg til element" -knappen. Legg flere elementer og klikk på "listeelementer" knappen for å se elementene i listeboksen.