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