Re: 如何讓顏色數值增加??

看板Visual_Basic作者 (蛋蛋的憂愁)時間16年前 (2007/10/21 06:18), 編輯推噓1(1推 0噓 0→)
留言1則, 1人參與, 最新討論串2/5 (看更多)
※ 引述《uclahenry (fucker)》之銘言： : 如何 : 按button1後 : 讓 label1.backcolor 得 三原色中的 紅色數值增加5?? : 顏色素質範圍先不要管 Dim tmpColor As Long, redColor As Integer tmpColor = Label1.BackColor '取出數值 redColor = tmpColor And 255 '只取出紅色 redColor = (redColor + 5) And 255 '把紅色+5並且限制255之內 Label1.BackColor = (tmpColor And &HFFFF00) + redColor '其他顏色不變.紅色放回去 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.132.202.125
推
10/21 08:00, , 1F
thxxxxxxxx
10/21 08:00, 1F
‣ 更多 blackAIX 的文章
文章代碼(AID): #176dwm_3 (Visual_Basic)
討論串 (同標題文章)
本文引述了以下文章的的內容：
以下文章回應了本文：
完整討論串 (本文為第 2 之 5 篇)：
排序： 最舊先 | 最新先 | 留言數
在新視窗開啟完整討論串 (共5篇)
‣ 更多 blackAIX 的文章
文章代碼(AID): #176dwm_3 (Visual_Basic)