MyTetra Share
Делитесь знаниями!
Время создания: 31.07.2019 22:37
Текстовые метки: RGB, ЦВЕТ
Раздел: Разные закладки - VBA
Запись: xintrea/mytetra_db_adgaver_new/master/base/1521693219uca5413wqe/text.html на raw.githubusercontent.com

Возвращает целое число типа 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.



Так же в этом разделе:
 
MyTetra Share v.0.65
Яндекс индекс цитирования