RGB Function
āĻ˛āĻžāĻ˛, āĻ¸āĻŦā§āĻ, āĻāĻŦāĻ āĻ¨ā§āĻ˛ āĻāĻŽāĻĒā§āĻ¨ā§āĻ¨ā§āĻ āĻ¸āĻŽā§āĻŦāĻ˛āĻŋāĻ¤ āĻĻā§āĻ°ā§āĻ āĻāĻ¨āĻāĻŋāĻāĻžāĻ° āĻ°āĻā§āĻ° āĻŽāĻžāĻ¨ āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻāĻ°ā§āĨ¤
āĻ¸āĻŋāĻ¨āĻā§āĻ¯āĻžāĻā§āĻ¸:
RGB (āĻ˛āĻžāĻ˛, āĻ¸āĻŦā§āĻ, āĻ¨ā§āĻ˛)
āĻĒā§āĻ°āĻĻāĻžāĻ¨ āĻŽāĻžāĻ¨:
āĻ˛āĻ
āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ°:
āĻ˛āĻžāĻ˛: āĻ¯ā§āĻā§āĻ¨ā§ āĻāĻ¨āĻāĻŋāĻāĻžāĻ° āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯āĻž āĻ¯ā§āĻāĻŋāĻ āĻ°āĻā§āĻ° āĻ˛āĻžāĻ˛ āĻāĻŽā§āĻĒā§āĻ¨ā§āĻ¨ā§āĻ (ā§Ļ-ā§¨ā§Ģā§Ģ) āĻāĻĒāĻ¸ā§āĻĨāĻžāĻĒāĻ¨ āĻāĻ°ā§āĨ¤
āĻ¸āĻŦā§āĻ: āĻ¯ā§āĻā§āĻ¨ā§ āĻāĻ¨āĻāĻŋāĻāĻžāĻ° āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯āĻž āĻ¯ā§āĻāĻŋāĻ āĻ°āĻā§āĻ° āĻ¸āĻŦā§āĻ āĻāĻŽā§āĻĒā§āĻ¨ā§āĻ¨ā§āĻ (ā§Ļ-ā§¨ā§Ģā§Ģ) āĻāĻĒāĻ¸ā§āĻĨāĻžāĻĒāĻ¨ āĻāĻ°ā§āĨ¤
āĻ¨ā§āĻ˛: āĻ¯ā§āĻā§āĻ¨ā§ āĻāĻ¨āĻāĻŋāĻāĻžāĻ° āĻāĻā§āĻ¸āĻĒā§āĻ°ā§āĻļāĻ¨ āĻ¯āĻž āĻ¯ā§āĻāĻŋāĻ āĻ°āĻā§āĻ° āĻ¨ā§āĻ˛ āĻāĻŽā§āĻĒā§āĻ¨ā§āĻ¨ā§āĻ (ā§Ļ-ā§¨ā§Ģā§Ģ) āĻāĻĒāĻ¸ā§āĻĨāĻžāĻĒāĻ¨ āĻāĻ°ā§āĨ¤
āĻāĻĻāĻžāĻšāĻ°āĻŖ:
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
MsgBox "The color " & lVar & " consists of:" & Chr(13) &_
"red= " & red(lVar) & Chr(13)&_
"green= " & green(lVar) & Chr(13)&_
"blue= " & blue(lVar) & Chr(13) , 64,"colors"
End Sub