Возвращает целое число типа 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) ' Return the value for Red.
I = 75 ' Initialize offset.
RGBValue = RGB(I, 64 + I, 128 + I) ' Same as RGB(75, 139, 203).
MyObject.Color = RGB(255, 0, 0) ' Set the Color property of
' MyObject to Red.