Função Blue
Returns the blue component of the specified composite color code.
Sintaxe:
Blue (Cor As Long)
Valor de retorno:
Número inteiro
Parâmetro:
Color value: Long integer expression that specifies any composite color code for which to return the blue component.
Exemplo:
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
MsgBox "A cor " & lVar & " consiste em:" & Chr(13) &_
"vermelho= " & Red(lVar) & Chr(13)&_
"verde= " & Green(lVar) & Chr(13)&_
"azul= " & Blue(lVar) & Chr(13) , 64,"cores"
End Sub