RGB Function
Возвращает значение цвета типа Long, состоящее из красного, зелёного и синего компонентов.
Синтаксис
RGB (Красный, Зелёный, Синий)
Возвращаемое значение:
Long
Параметр:
Красный. Выражение из целых чисел, которое представляет красный компонент (0-255) составного цвета.
Зелёный. Выражение из целых чисел, которое представляет зелёный компонент (0-255) составного цвета.
Синий. Выражение из целых чисел, которое представляет синий компонент (0-255) составного цвета.
Пример:
Sub ExampleColor
Dim lVar As Long
lVar = rgb(128,0,200)
MsgBox "Этот цвет " & lVar & " состоит из:" & Chr(13) &_
"красного= " & red(lVar) & Chr(13)&_
"зелёного= " & green(lVar) & Chr(13)&_
"синего= " & blue(lVar) & Chr(13) , 64,"цветов"
End Sub