Koodit: VB.NET: Esimerkkejä taulukoista

'**********************************
'  vb.net Array luokka, esimerkkejä
'  tnb 2004
'**********************************

Dim pelaaja As Object
Dim i As Integer
Dim Joukkue() As String = {"Simo", "Matti", "Litti"}

'taulukon aakkostus
Joukkue.Sort(Joukkue)

'öökköstys
Joukkue.Reverse(Joukkue)

'kahden taulukon akkostus, "nimet pelinumeron mukaisesti"
Joukkue(0) = "Simo" : Joukkue(1) = "Matti" : Joukkue(2) = "Litti"
Dim Pelinumero() As Integer = {12, 16, 10}
Joukkue.Sort(Pelinumero, Joukkue)

'taulukon ulottuvuudet
i = Joukkue.Rank ' 1

' taulukon yhteiskoko
i = Joukkue.Length '3

'annetun dimension koko
i = Joukkue.GetLength(0)  'dimensiot alkaa nollasta

'taulukon alku indeksi
i = Joukkue.GetLowerBound(0) ' zero base
'taulukon loppu indeksi
i = Joukkue.GetUpperBound(0) 'zero based

'kopiointi, koko joukkue farmiin
Dim Farmi(Joukkue.Length) As String
Joukkue.CopyTo(Farmi, 0)

'taulukosta etsiminen
i = Joukkue.IndexOf(Joukkue, "Simo")

'cloonaus
Dim uusijoukkue() As String = Joukkue.Clone()

'enumerointi
pelaaja = Joukkue.GetEnumerator
For Each pelaaja In Joukkue
    'Debug.Write(pelaaja)
Next

'tyhjäys
System.Array.Clear(Joukkue, 0, Joukkue.Length)