Vraća dugu vrijednost koja predstavlja RGB kod boje koji odgovara navedenom broju boje.
Sintaksa
QBColor ( boja )
Obavezna bojaargument cijeli je broj u rasponu od 0 do 15.
Postavke
Argument boja ima sljedeće postavke:
|
Broj |
Color |
Broj |
Color |
|
0 |
Crno |
8 |
Sivo |
|
1 |
Plava |
9 |
Svijetloplava |
|
2 |
Zelena |
10 |
Svijetlo zelena |
|
3 |
Cijan |
11 |
Svijetli cijan |
|
4 |
Umetanje simbola |
12 |
Svijetlocrvena |
|
5 |
Magenta |
13 |
Svijetla magenta |
|
6 |
Žuto |
14 |
Svijetložuta |
|
7 |
Bijelo |
15 |
Jarko bijelo |
Napomene
Argument boja predstavlja vrijednosti boja koje koriste starije verzije programa Basic (kao što su Microsoft Visual Basic for MS-DOS i Basic Compiler). Počevši od najmanje značajnog bajta, vraćena vrijednost određuje crvene, zelene i plave vrijednosti koje se koriste za postavljanje odgovarajuće boje u RGB sustavu koji koristi Visual Basic for Applications.
Primjer
Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.
U ovom se primjeru funkcija QBColor koristi za promjenu svojstva BackColor obrasca proslijeđenog kao MyForm u boju koju označava ColorCode. QBColor prihvaća cjelobrojne vrijednosti između 0 i 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
