Petit prog de couleur rgb

Télécharger le projet
Commenter

Description

'#################################################################
' ce petit prog tout simple peut etre util pour ceux qui voudrais
' donner une couleur bien pariculière a un objet ou text avec la
' fonction RGB (Rouge Vert Bleu) cela permet de faire des test de
'couleur et de choisir la bonne combinaison
' je touve ca mieux ques les couleurs standard de VB en Hex

'#################################################################

Source / Exemple : 


'#################################################################
' ce petit prog tout simple peut etre util pour ceux qui voudrais
' donner une couleur bien pariculière a un objet ou text avec la
' fonction RGB (Rouge Vert Bleu) cela permet de faire des test de
'couleur et de choisir la bonne combinaison
' je touve ca mieux ques les couleurs standard de VB en Hex

'#################################################################
Private Sub Command1_Click()
End
End Sub

Private Sub Slider1_Scroll(Index As Integer)
'Le Shape prend la combinaison de couleurs Rouge Vert Bleu
' Defini par les sliders ou les textbox
Shape1.BackColor = RGB(Slider1(0), Slider1(1), Slider1(2))
Text1(0) = Slider1(0)
Text1(1) = Slider1(1)
Text1(2) = Slider1(2)
End Sub

Private Sub Text1_Change(Index As Integer)
Shape1.BackColor = RGB(Text1(0), Text1(1), Text1(2))
Slider1(0) = Text1(0)
Slider1(1) = Text1(1)
Slider1(2) = Text1(2)

End Sub
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_flohand)