Kirjautuminen

Haku

Tehtävät

Koodit: VB.NET: Esimerkkejä taulukoista

Kirjoittaja: tnb

Kirjoitettu: 07.09.2004 – 07.09.2004

Tagit: ohjelmointitavat, koodi näytille, vinkki

vb.net:n taulukko (Array) on sekin itseasiassa luokka, jolla on useita ominaisuuksia ja metodeja. Voit mm. aakkostaa, öökköstää, aakkostaa indeksitaulukon avulla, kopioida, cloonata, For Each ... Next looppikin toimii.

'**********************************
'  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)

Kommentit

Juice [08.09.2004 18:26:56]

#

Sinä vaan näitä luokkia laittelet :)
No joo, onhan nää hyödyllisiä, mutta samat löytyy kun avaa Microsoft.VisualBasic.dll:n :P

thekoodaaja [09.09.2004 19:28:23]

#

ihan hyödyllinen

Kirjoita kommentti

Muista lukea kirjoitusohjeet.
Tietoa sivustosta