Random kleur - Picturebox

Status
Niet open voor verdere reacties.

AnthoVN

Gebruiker
Lid geworden
8 feb 2012
Berichten
22
Beste programmeurs,

Gisteren ben ik begonnen met het project: Pong,
ook hierbij heb ik enkele problemen, maar die zijn voor het andere topic!

Nu wil ik weten hoe je een random kleur instelt?
Ik wil het namelijk via een timer doen, en met Dim random as new random werkt het niet,
dit is blijkbaar alleen voor random getalen.

enige suggesties?

Vriendelijke groet,

AnthoVN
 
Probleem opgelost

Code:
Private Dim Rood, blauw, groen as integer
Private sub timer1.......

Rood = int(rnd() * 255)
Blauw = int(Rnd() * 255)
Groen = int(Rnd() * 255)

  picBal.BackColor = Color.FromArgb(Rood, blauw, Groen)
 
Laatst bewerkt:
Je zou ook een random getal kunnen genereren en daarmee een kleur selecteren:

Pseudocode:

Code:
Dim randomgetal = randomgetal van 1 tot 3
Select Case randomgetal
Case 1
blauw
Case 2
groen
Case 3
rood
End Select
 
Je zou ook een random getal kunnen genereren en daarmee een kleur selecteren:

Pseudocode:

Code:
Dim randomgetal = randomgetal van 1 tot 3
Select Case randomgetal
Case 1
blauw
Case 2
groen
Case 3
rood
End Select
hiermee verandert hij niet in een random kleur, maar in een kleur die je zelf opgeeft.
In mijn code kan hij zowat eendert welke kleur aannemen ;)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan