IBM Lotus Symphony
|
赤 (Red)、緑 (Green)、青 (Blue) のコンポーネントで指定されたカラー値を示すロング整数を返します。
RGB (Red, Green, Blue)
ロング整数
Red : コンポジットカラーの、赤 (Red) コンポーネントを指定する整数表式 (0-255)。
Green : コンポジットカラーの、緑 (Green) コンポーネントを指定する整数表式 (0-255)。
Blue : コンポジットカラーの、青 (Blue) コンポーネントを指定する整数表式 (0-255)。
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