by Prasad Bhojak (1 Submission)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 11th August 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Code provides exclusive color combinations through scrolling by the user , he/she can use the scroll bar as they want to generate colors
API Declarations
3 labels namely red blue & green
and a command button control to close the form
name hscroll bars as identical to labels as colors
End
End Sub
Private Sub hsbblue_Change()
docolor 'call a general procedure docolor'
End Sub
Private Sub hsbblue_Scroll()
docolor 'call the hsbblue_change procedure'
End Sub
Private Sub hsbgreen_Change()
docolor 'call a general procedure docolor'
End Sub
Private Sub hsbgreen_Scroll()
hsbgreen_Change 'call the hsbgreen_change procedure'
End Sub
Private Sub hsbred_Change()
docolor 'call a general procedure docolor'
End Sub
Private Sub hsbred_Scroll()
hsbred_Change 'call the hsbred_change procedure'
End Sub
Public Sub docolor()
Frmcolors.BackColor = RGB(hsbred.Value, hsbgreen.Value, hsbblue.Value)
End Sub
No comments have been posted about Code provides exclusive color combinations through scrolling by the user , he/she can use the scrol. Why not be the first to post a comment about Code provides exclusive color combinations through scrolling by the user , he/she can use the scrol.