kan iemand vertellen hoe ik dit moet doen

[rogiervmaanen]

kan iemand vertellen hoe ik dit moet doen genereer getal heb ik maar weet niet hoe ik die kleur moet bepalen bij een nummer



Opdracht 5: De Rnd() functie

De Rnd() functie genereert een (random) getal tussen 0 en 1.
Int(6 * Rnd() + 1) genereert een getal tussen 1 en 6.
Maak het onderstaande window:

• Bij het klikken op de button ‘genereer getal’ wordt een random getal tussen 1 en 3 opgeslagen in een variabele.
• Bij het klikken op de button ‘bepaal kleur’ wordt een melding getoond met de kleur rood, wit of blauw. Indien het eerder gegeneerde getal 1 was wordt de kleur rood, indien 2 dan wit, indien 3 dan blauw. Bijvoorbeeld:

 

[JoZ1]

[CPP]Dim r As New Random
Dim getal As Integer = r.Next(1,3)
Select Case getal
Case 1
MsgBox("Wit")
Case 2
MsgBox("Rood")
Case 3
MsgBox("Groen")
End Select[/CPP]