by Ravikant Amane (3 Submissions)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 10th August 2006
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Set any dynamic color to back of textbox in simple way
API Declarations
'Take 3 Labels for display values of Hscroll & Change name label3,label8,label9
'take text box change name txtrno
Private Sub HScroll1_Change()
Label3.Caption = HScroll1.Value
txtrno.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll2_Change()
Label8.Caption = HScroll2.Value
txtrno.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll3_Change()
Label9.Caption = HScroll3.Value
txtrno.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub