Повертає довге ціле, що позначає код кольору RGB, що відповідає вказаному номеру кольору.
Синтаксис
QBColor(колір)
Обов'язковий аргумент кольору– це ціле число в діапазоні від 0 до 15.
Параметри
Аргумент color має такі параметри:
| число | Колір | число | Колір |
|---|---|---|---|
| 0 | Чорний | 8 | Сірий |
| 1 | Синій | 9 | Світло-синій |
| 2 | Зелений | 10 | Світло-зелений |
| 3 | Блакитний | 11 | Світлий блакитний |
| 4 | Вставлення символу | 12 | Світло-червоний |
| 5 | Пурпуровий | 13 | Світлий пурпуровий |
| 6 | Жовтий | 14 | Світло-жовтий |
| 7 | Білий | 15 | Яскраво-білий |
Примітки
Аргумент color представляє значення кольорів, які використовувалися в попередніх версіях Basic (наприклад, Microsoft Visual Basic для MS-DOS і Basic Compiler). Починаючи з найменш значущого байту, повернуте значення визначає червоні, зелені та сині значення, які використовуються для встановлення відповідного кольору в системі RGB, що використовується Visual Basic for Applications.
Приклад
Примітка.
У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У цьому прикладі використано функцію QBColor , щоб змінити властивість BackColor форми, переданої до MyForm кольору, позначеного ColorCode.
QbColor приймає цілі значення від 0 до 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub