Vraća dugačak broj koji predstavlja RGB kôd boje koji odgovara navedenom broju boje.
Sintaksa
QBColor ( boja )
Obavezni argument boje je ceo broj u opsegu od 0 do 15.
Postavke
Argument boja ima sledeće postavke:
Broj |
Boja |
Broj |
Boja |
0 |
Crno |
8 |
Grej |
1 |
Plava |
9 |
Svetloplava |
2 |
Zelena |
10 |
Svetlozelena |
3 |
Cijan |
11 |
Svetlocijan |
4 |
Red |
12 |
Svetlocrvena |
5 |
Magenta |
13 |
Svetla magenta |
6 |
Ћuti |
14 |
Svetložuta |
7 |
Belo |
15 |
Svetlo belo |
Napomene
Argument boja predstavlja vrednosti boje koje koriste starije verzije programa Basic (kao što su Microsoft Visual Basic za MS-DOS i Osnovni kompajler). Počevši od najmanje bitnog bajta, dobijena vrednost navodi crvene, zelene i plave vrednosti koje se koriste za podešavanje odgovarajuće boje u RGB sistemu koji koristi Visual Basic for Applications.
Primer
Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.
Ovaj primer koristi funkciju QBColor da bi se promenilo svojstvo "BackColor " obrasca prosleđenog kao MyForm boji na koju ukazuje ColorCode. QBColor prihvata vrednosti celog broja između 0 i 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form) MyForm.BackColor = QBColor(ColorCode) End Sub