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

Функция RGB

office 365 dev account|Последнее обновление: 29.09.2017
|
1 Участник

Возвращает целое число типа Long , представляющее значение цвета RGB. СинтаксисRGB ( красного, зеленого, синего ) Синтаксис функции RGB состоит из следующихименованных аргументов:

ЧастьОписание
красныйОбязательный элемент; Variant ( Целое число ). Число в диапазоне от 0 до 255 включительно, представляющее красного компонента цвета.
ЗеленыйОбязательный элемент; Variant ( Целое число ). Число в диапазоне от 0 до 255 включительно, представляющее зеленого компонента цвета.
синийОбязательный элемент; Variant ( Целое число ). Число в диапазоне от 0 до 255 включительно, представляющее синего компонента цвета.

Примечания Приложение методы иСвойства , принимающие цвета нужны значение цвета спецификации число, представляющее RGB. Значение цвета RGB указывает относительную интенсивность красного, зеленого и синего цвета для отображения. Предполагается, что значение для любого аргумента в RGB , превышающее 255 255. В следующей таблице приведены некоторые стандартные цвета и значения красного, зеленого и синего, которые они включают:

ЦветЗначение красногоЗначение зеленогоЗначение синего
Черный000
Синий00255
Зеленый02550
Голубой0255255
Красный25500
Пурпурный2550255
Желтый2552550
Белый255255255

Возвращаемые этой функцией значения цвета 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.59
Яндекс индекс цитирования