Função RGB

Retorna um valor de cor inteiro longo que consiste dos componentes vermelho, verde e azul.

Sintaxe:


RGB (Red, Green, Blue)

Valor de retorno:

Long

Parâmetro:

Red: qualquer expressão de número inteiro que represente o componente vermelho (0-255) da cor composta.

Green: qualquer expressão de número inteiro que represente o componente verde (0-255) da cor composta.

Blue: qualquer expressão de número inteiro que represente o componente azul (0-255) da cor composta.

Códigos de erro:

5 Chamada de procedimento inválida

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

♥ Doe para nosso projeto! ♥