RGB 函数
返回由红色、绿色和蓝色成分组成的长整型颜色值。
语法:
RGB (Red, Green, Blue)
返回值:
Long
参数:
Red:表示颜色中红色成分 (0-255) 的任意整数表达式。
Green:表示颜色中绿色成分 (0-255) 的任意整数表达式。
Blue:表示颜色中蓝色成分 (0-255) 的任意整数表达式。
示例:
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
MsgBox "颜色" & lVar & " 的组成:"& Chr(13) &_
"red= " & red(lVar) & Chr(13)&_
"green= " & green(lVar) & Chr(13)&_
"blue= " & blue(lVar) & Chr(13) , 64,"colors"
End Sub