Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает значение типа Long, представляющее код цвета RGB, соответствующий указанному номеру цвета.
Синтаксис
QBColor(color)
Обязательный аргументcolor — это целое число в диапазоне от 0 до 15.
Параметры
Аргумент color может принимать следующие значения.
| Номер | Цвет | Номер | Цвет |
|---|---|---|---|
| 0 | Черный | 8 | Серый |
| 1 | Синий | 9 | Светло-синий |
| 2 | Зеленый | 10 | Светло-зеленый |
| 3 | Cyan | 11 | Светло-голубой |
| 4 | Красный | 12 | Светло-красный |
| 5 | Пурпурный | 13 | Светло-пурпурный |
| 6 | Желтый | 14 | Светло-желтый |
| 7 | Белый | 15 | Ярко-белый |
Замечания
Аргумент color представляет значения цвета, которые использовались в предыдущих версиях Basic (таких как Microsoft Visual Basic для MS-DOS и Basic Compiler). Начиная с младшего байта, возвращенное значение задает значения красного, зеленого и синего цветов для определения соответствующего цвета в системе RGB, используемой в Visual Basic для приложений.
Пример
В этом примере функция QBColor используется для изменения свойства BackColor формы, переданной в качестве MyForm цвета, указанного .ColorCode Функция QBColor принимает целочисленные значения в диапазоне от 0 до 15.
Sub ChangeBackColor (ColorCode As Integer, MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.