Keskustelu: Ohjelmointikysymykset: VB6: Satunnaisuus (VB)

Oletetaan että minulla on 5 erilaista vaihtoehtoa.

- Banaani
- Omena
- Puolukka
- Mandariini
- Meloni

Haluan ohjelman valitsevan noista _satunnaisesti_ ihan minkä vaan... mikä on se perusperiaate VB:ssä eli satunnaisluvuista on ilmeisesti kyse - tai jostain vastaavasta :)

en osaa Veebeetä pahemmin mutta
kokeile jotain A = int(rnd * 5) + 1
if a = 1 then banaani tai jotain

Katsopa näitä:

http://vb.ohjelmointiputka.net/?Rnd
http://vb.ohjelmointiputka.net/?Randomize

Dim Vaihtoehdot(4) As String
Dim Arvottu As Byte

Vaihtoehdot(0) = "Banaani"
Vaihtoehdot(1) = "Omena"
Vaihtoehdot(2) = "Puolukka"
Vaihtoehdot(3) = "Mandariini"
Vaihtoehdot(4) = "Meloni"

RANDOMIZE TIMER

Arvottu = Int(Rnd * 4)
MsgBox "Arvottiin: " & Vaihtoehdot(Arvottu)

Toivottavasti koodi edes suurinpiirtein meni oikein, VB:tä ei ole tullut käytettyä reiluun puoleen vuoteen :)