Функция QBColor

Возвращает значение типа Long, отражающее цвет RGB, соответствующий указанному номеру цвета.

Синтаксис

QBColor ( цвет )

Обязательный аргумент цветаргумент является целым числом в диапазоне от 0 до 15.

Параметры

Аргумент цвет может принимать следующие значения:

Номер

Цвет

Номер

Цвет

0

Черный

8

Серый

1

Синий

9

Светло-синий

2

Зеленый

10

Светло-зеленый

3

Голубой

11

Светло-голубой

4

Красный

12

Светло-красный

5

Пурпурный

13

Светло-пурпурный

6

Желтый

14

Светло-желтый

7

Белый

15

Ярко-белый


Замечания

Аргумент цвет представляет значения цветов, используемые в более ранних версиях Basic (например, Microsoft Visual Basic для MS-DOS и Basic Compiler). Начиная с младшего байта, возвращаемое значение определяет значения красного, зеленого и синего цветов, которые используются для задания соответствующего цвета в системе RGB, применяемой в Visual Basic для приложений (VBA).

Пример

Примечание : В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В данном примере функция QBColor используется для изменения свойства BackColor формы, передаваемой как MyForm, для цвета, указанного переменной ColorCode. Функция QBColor принимает целочисленные значения от 0 до 15.

Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
Совершенствование навыков
Перейти к обучению
Первоочередный доступ к новым возможностям
Присоединиться к программе предварительной оценки Office

Были ли сведения полезными?

Спасибо за ваш отзыв!

Благодарим за отзыв! Возможно, будет полезно связать вас с одним из наших специалистов службы поддержки Office.

×