IBM Lotus Symphony
|
Vráti zelený komponent špecifikovaného kódu farby.
Green (Color As Long)
Typ Integer
Color: Dlhý celočíselný výraz, ktorý špecifikuje kód farby, pre ktorý sa má vrátiť zelený komponent.
Sub ExampleColor
Dim lVar ako typ Long
lVar = rgb(128,0,200)
msgbox "Farba " & lVar & " obsahuje komponenty:" & Chr(13) &_
"červená = " & red(lVar) & Chr(13)&_
"zelená = " & green(lVar) & Chr(13)&_
"modrá = " & blue(lVar) & Chr(13) , 64,"farby"
end sub