Возвращает значение типа Long, представляющее значение цвета RGB.
Синтаксис
RGB( красный, зеленый, синий )
Функция RGB имеет следующие аргументы:
Аргумент |
Описание |
красный |
Обязательный аргумент. Variant (Integer). Число в диапазоне от 0 до 255 включительно, определяющее красный компонент цвета. |
зеленый |
Обязательный аргумент. Variant (Integer). Число в диапазоне от 0 до 255 включительно, определяющее зеленый компонент цвета. |
синий |
Обязательный аргумент. Variant (Integer). Число в диапазоне от 0 до 255 включительно, определяющее синий компонент цвета. |
Замечания
Использование спецификации цвета методами и свойствами приложения основано на предположении, что численное значение спецификации является значением цвета RGB. Значение RGB определяет отображаемый цвет, задавая относительную яркость красного, зеленого и синего.
Значение любого аргумента функции RGB, превышающее 255, приравнивается к 255.
В следующей таблице представлены некоторые стандартные цвета и образующие их значения красного, зеленого и синего компонентов.
Цвет |
Значение красного компонента |
Значение зеленого компонента |
Значение синего компонента |
Черный |
0 |
0 |
0 |
Синий |
0 |
0 |
255 |
Зеленый |
0 |
255 |
0 |
Голубой |
0 |
255 |
255 |
Красный |
255 |
0 |
0 |
Пурпурный |
255 |
0 |
255 |
Желтый |
255 |
255 |
0 |
Белый |
255 |
255 |
255 |
Возвращаемые данной функцией цвета RGB несовместимы с цветами, используемыми в операционной системе masOS. Они могут использоваться в контексте приложений Майкрософт для masOS, но не должны применяться, когда цвет передается непосредственно в операционную систему masOS.
Пример
Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.
В данном примере показано использование функции RGB для возврата целого числа, представляющего цвет RGB. Она применима к тем методам и свойствам приложения, которые принимают спецификацию цвета. Объект MyObject и его свойства служат только для иллюстрации. Если объект MyObject отсутствует или для него не задано свойство Color, возникает ошибка.
Dim RED, I, RGBValue, MyObject
' Return the value for Red. Red = RGB(255, 0, 0) ' Initialize offset. I = 75 RGBValue = RGB(I, 64 + I, 128 + I) ' Same as RGB(75, 139, 203). ' Set the Color property of MyObject to Red. MyObject.Color = RGB(255, 0, 0)