IBM Lotus Symphony


Função Red [Tempo de Execução]

Retorna o componente Red do código de cores especificado.

Sintaxe:

Red (ColorNumber As Long)

Valores de Retorno:

Inteiro

Parâmetro:

ColorNuber: Expressão de inteiros longos que especificam um código de cor para o qual o componente Vermelho será retornado.

Códigos de Erro

5 Chamada de procedimento inválida

Exemplo:

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


Feedback do Produto | Documentação Adicional | Marcas Registradas