Função Blue
Devolve o componente azul do código da cor especificada.
Sintaxe:
Blue (Cor As Long)
Valor de retorno:
Número inteiro
Parâmetro:
Cor: expressão de valor inteiro longo que especifica qualquer código de cor para o qual será devolvido o componente azul.
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