by ojas (14 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 1st October 2005
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
This program will change background colour of the form as you scroll the scrollbars
VBcoders
Private Sub Form_Load()
Form1.WindowState = 2
End Sub
Private Sub Command1_Click()
Dim s As String
s = MsgBox("Are you sure?", vbYesNo)
If s = vbYes Then
End
End If
End Sub
Private Sub HScroll1_Change()
Form1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll1_Scroll()
Form1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll2_Change()
Form1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll2_Scroll()
Form1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll3_Change()
Form1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub HScroll3_Scroll()
Form1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub
Private Sub Timer1_Timer()
Timer2.Enabled = True
End Sub
No comments have been posted about This program will change background colour of the form as you scroll the scrollbars. Why not be the first to post a comment about This program will change background colour of the form as you scroll the scrollbars.