用VB寫的調(diào)色板

電梯直達

樓主

ID:11064 發(fā)表于 2017-6-18 09:12 | 只看該作者回帖獎勵

VB調(diào)色板調(diào)色板

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

分享到: QQ好友和群 QQ空間 騰訊微博 騰訊朋友

帳號		自動登錄	找回密碼
密碼			立即注冊