Функция RGB
Возвращает целое число типа Long , представляющее значение цвета RGB. СинтаксисRGB ( красного, зеленого, синего ) Синтаксис функции RGB состоит из следующихименованных аргументов:
Часть | Описание |
---|
красный | Обязательный элемент; Variant ( Целое число ). Число в диапазоне от 0 до 255 включительно, представляющее красного компонента цвета. |
Зеленый | Обязательный элемент; Variant ( Целое число ). Число в диапазоне от 0 до 255 включительно, представляющее зеленого компонента цвета. |
синий | Обязательный элемент; Variant ( Целое число ). Число в диапазоне от 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 не совместимы со значениями,
используемыми операционной системой Macintosh. Они могут использоваться в
контексте приложений Microsoft для Macintosh, но не должны
использоваться при непосредственной передачи изменений цвета в
операционную систему Macintosh.
Пример
В этом примере показано, как используется функция RGB возвращает целое число, представляющее значение цвета RGB . Он используется для эти методы и свойства приложения, принимающие цвета. Объект MyObject
и его свойство используются только для иллюстрации. Если MyObject
не существует, или если он не имеет свойство цвета , возникает ошибка.
Dim RED, I, RGBValue, MyObject
Red = RGB(255, 0, 0)
I = 75
RGBValue = RGB(I, 64 + I, 128 + I)
MyObject.Color = RGB(255, 0, 0)