Toevoegen aan Array

[bonnowagt]

Ik heb in VB 2010 de volgende ARRAY aangemaakt:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Randomize()
Dim WOORD(10)
WOORD(0) = "BAKOVEN"
WOORD(1) = "OLIFANT"
WOORD(2) = "KONVOOI"
WOORD(3) = "WAMBUIS"
WOORD(4) = "KOSTUUM"
WOORD(5) = "KOFFERS"
WOORD(6) = "ZESTIEN"
WOORD(7) = "OVERWEG"
WOORD(8) = "OVERVAL"
WOORD(9) = "PERSOON"
WOORD(10) = "PEDALEN"
Dim nr
nr = Int(Rnd() * 10)
TextBox1.Text = (WOORD(nr))

Mijn vraag in deze is hoe kan een gebruiker een woord aan deze Array toevoegen.
dim woord moet dan natuurlijk worden verhoogd en ook Int(Rnd() * 10)
Wie kan mij helpen

Alvast bedankt

 

[The Mighty Atom]

Je kan ook een List gebruiken, dit is eigenlijk ook een array type, en items toevoegen gaat makkelijk door middel van de Add method:

        Dim WoordenLijst As New List(Of String)

        WoordenLijst.AddRange({ _
                       "BAKOVEN", _
                       "OLIFANT", _
                       "KONVOOI", _
                       "WAMBUIS", _
                       "KOSTUUM", _
                       "KOFFERS", _
                       "ZESTIEN", _
                       "OVERWEG", _
                       "OVERVAL", _
                       "PERSOON", _
                       "PEDALEN"})

Om een woord toe te voegen, gebruik je de Add method:

WoordenLijst.Add("KNOLRAAP")

En ik wil je adviseren om je variables een datatype mee te geven. Dit om eventuele problemen in de toekomst te vermijden.
Dus

Dim i As Integer

en niet

Dim i