Tuesday, February 22, 2011

Write a Visual Basic Program in which by moving the horizontal scroll bar the color of the font ranges and each of three horizontal scroll bar represe

WAP in which by moving the horizontal scroll bar the color of the font ranges and each of three horizontal scroll bar represents red, blue, green colors by using RGB built in function.
____________________________________________________________________
Private Sub Command1_Click()
'Text1.BackColor = 255
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
Text1.Enabled = False
HScroll1.Max = 255
HScroll1.Min = 0
HScroll1.SmallChange = 1
HScroll1.LargeChange = 2
HScroll1.Value = 255
HScroll2.Max = 255
HScroll2.Min = 0
HScroll2.SmallChange = 1
HScroll2.LargeChange = 2
HScroll2.Value = 0
HScroll3.Max = 255
HScroll3.Min = 0
HScroll3.Value = 0
HScroll3.SmallChange = 1
HScroll3.LargeChange = 2
End Sub

Private Sub HScroll1_Change()
Text1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub

Private Sub HScroll2_Change()
Text1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub

Private Sub HScroll3_Change()
Text1.BackColor = RGB(HScroll1.Value, HScroll2.Value, HScroll3.Value)
End Sub

__________________________________________________________
OUTPUT
__________________________________________________________



____________________________________
DOWNLOAD
____________________________________

Download its form

Download its Image



No comments:

Post a Comment