标题: 用VB写的调色板 [打印本页]

---

作者: hsy2966    时间: 2017-6-18 09:12
标题: 用VB写的调色板

VB调色板调色板

Private Sub Form_Load()

Form1.BackColor = RGB(255, 255, 255)

End Sub

Private Sub HScroll1_Change()

Form1.BackColor = RGB(HScroll1.Value,HScroll2.Value, HScroll3.Value)

Label4.Caption = HScroll1.Value

End Sub

Private Sub HScroll2_Change()

Form1.BackColor = RGB(HScroll1.Value,HScroll2.Value, HScroll3.Value)

Label5.Caption = HScroll2.Value

End Sub

Private Sub HScroll3_Change()

Form1.BackColor = RGB(HScroll1.Value,HScroll2.Value, HScroll3.Value)

Label6.Caption = HScroll3.Value

End Sub

---

欢迎光临 (http://www.51hei.com/bbs/)

Powered by Discuz! X3.1