24h購物| | PChome| 登入
2005-01-26 16:58:53| 人氣42| 回應0 | 上一篇 | 下一篇

恩～變色

推薦 0 收藏 0 轉貼0 訂閱站台


Private Sub hsbblue_Change()
hsbblue.Min = 0
hsbblue.Max = 255
hsbblue.SmallChange = 10

txtcolor.BackColor = RGB(hsbred.Value, hsbblue.Value, hsbgreen.Value)
這句是重點！！


End Sub

Private Sub hsbgreen_Change()
hsbgreen.Min = 0
hsbgreen.Max = 255
hsbgreen.SmallChange = 10
txtcolor.BackColor = RGB(hsbred.Value, hsbblue.Value, hsbgreen.Value)

End Sub

Private Sub hsbred_Change()
hsbred.Min = 0
hsbred.Max = 255
hsbred.SmallChange = 10
txtcolor.BackColor = RGB(hsbred.Value, hsbblue.Value, hsbgreen.Value)

End Sub

我要檢舉
台長： 酷仔♫° 瘋　
人氣(42) | 回應(0)| 推薦 (0)| 收藏 (0)| 轉寄
全站分類: 工作甘苦(工作心得、創業、求職)

我要回應
否 是 (若未登入"個人新聞台帳號"則看不到回覆唷!)
* 請輸入識別碼：
請輸入圖片中算式的結果(可能為0) 
(有*為必填)
TOP
詳全文