Blue Function
Returns the blue component of the specified composite color code.
āϏāĻŋāύāĻā§āϝāĻžāĻā§āϏ:
Blue (Color As Long)
āĻĒā§āϰāĻĻāĻžāύ āĻŽāĻžāύ:
Integer
āĻĒā§āϝāĻžāϰāĻžāĻŽāĻŋāĻāĻžāϰ:
Color value: Long integer expression that specifies any composite color code for which to return the blue component.
āĻāĻĻāĻžāĻšāϰāĻŖ:
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