+ of - in een label

[Matthew117]

Ik moet voor een opdracht een rekentrainer maken en ik moet in 10 aparte labels een "+" of een "-" laten verschijnen en dit moet random gebeuren dus elke keer moet het anders zijn.
Ook moet dit door middel van een array gebeuren.

Kan iemand mij hierbij helpen?

 

[Pim15]

Aangezien in tekst helpen handiger is dan de complete code geven, doe ik het even zo. Je kan eerst een array maken die 10 lang is (het aantal minnen en plussen), en die dan steeds doorlopen. Dan moet die nog worden gevuld, dat willekeurig moet. Omdat je uiteraard niet meteen willekeurige plussen en minnen kan krijgen, kan je dat het beste doen met cijfers. Dan zeg je eerst iets in de trant van: als ik een 1 krijg, maak er dan een minnetje van. Bij een 2, maak er dan een plusje van. De code om een willekeurig getal te krijgen is dit:

Dim waarde As Integer = CInt(Int(([COLOR="#FF0000"]bereik[/COLOR] * Rnd()) + [COLOR="#FF0000"]startwaarde[/COLOR]))

Voor een waarde die 1 of 2 is, vul je dit dus in:
bereik = 2
startwaarde = 1

Hiermee moet je er denk ik wel uitkomen. Als je nog vragen hebt, stel die dan!

Pim

 

[Matthew117]

Bedankt, dit heeft me geholpen!