IBM Lotus Symphony
|
Devuelve un valor de color entero largo que se compone de los componentes de color rojo, verde y azul.
RGB (Rojo, Verde, Azul)
Largo
Rojo: una expresión entera que representa el componente rojo (0-255) del color compuesto.
Verde: Una expresión entera que representa el componente verde (0-255) del color compuesto.
Azul: Una expresión entera que representa el componente azul (0-255) del color compuesto.
Sub EjemploColor
Dim lVar As Long
lVar = rgb(128,0,200)
msgbox "El color " & lVar & " contiene los componentes:" & Chr(13) &_
"rojo= " & red(lVar) & Chr(13)&_
"verde= " & green(lVar) & Chr(13)&_
"azul= " & blue(lVar) & Chr(13) , 64,"colores"
end sub