Couleurs de fond aleatoire ...

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 668 fois - Téléchargée 38 fois

Contenu du snippet

Couleurs de fond aleatoire ...

Il faut ;

1 Timer ( Interval = 100)
1 Form (Form1)
1 Bouton (Command1)

Source / Exemple :


Private Sub Command1_Click()

Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()

Rouge = (255 - 0 + 1) * Rnd + 0 ' Choissi aleatoirement un chiffre entre 0 et 255
Vert = (255 - 0 + 1) * Rnd + 0
Bleu = (255 - 0 + 1) * Rnd + 0

Form1.BackColor = RGB(Rouge, Vert, Bleu) ' applique la couleur

End Sub

A voir également

Ajouter un commentaire

Commentaires

Messages postés
262
Date d'inscription
dimanche 1 septembre 2002
Statut
Membre
Dernière intervention
18 juin 2008

tu peux faire + simple :

Rouge = Int(Rnd * 255)
Vert = Int(Rnd * 255)
Bleu = Int(Rnd * 255)

C vrai que c simplet mais y'en a que ça peut aider !
Et puis miko500 à raison, un petit coulement ça ferait + joli !
Messages postés
530
Date d'inscription
lundi 3 juin 2002
Statut
Membre
Dernière intervention
13 juin 2004

Je peux comprendre l'enthousiasme ke génère la production d'une source, reste à savoir l'utilité de celle-ci...
Messages postés
188
Date d'inscription
dimanche 29 octobre 2000
Statut
Membre
Dernière intervention
18 août 2005

c'est bien si tu veux regarder les couleurs, mais je sais pas,il y a comme un truc qui manque...il faudrait que les couleurs coulent, quelqu'un me suit ? lol
Messages postés
62
Date d'inscription
samedi 21 septembre 2002
Statut
Membre
Dernière intervention
5 août 2003

C'est tout petit !!! Si y aurai 200-300 lignes de code d'accord , mais pour 9 lignes ...
Messages postés
287
Date d'inscription
vendredi 25 octobre 2002
Statut
Membre
Dernière intervention
18 janvier 2004

Il fauDRAIT:
-un zip
-et c'est tout...

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.