Vráti hodnotu typu Long, ktorá predstavuje kód RGB farby zodpovedajúci zadanému číslu farby.
Syntax
QBColor ( farba )
Povinný argument farbaargument je celé číslo v rozsahu 0 až 15.
Nastavenia
Argument farba má tieto nastavenia:
Číslo |
Farba |
Číslo |
Farba |
0 |
Čierna |
8 |
Sivá |
1 |
Modrá |
9 |
Svetlomodrá |
2 |
Zelená |
10 |
Svetlozelená |
3 |
Azúrová |
11 |
Svetloazúrová |
4 |
Červená |
12 |
Svetločervená |
5 |
Purpurová |
13 |
Svetlopurpurová |
6 |
Žltá |
14 |
Svetložltá |
7 |
Biela |
15 |
Žiarivo biela |
Poznámky
Argument farba predstavuje farebné hodnoty, ktorá sa používali v starších verziách jazyka Basic (ako napríklad Microsoft Visual Basic for MS-DOS a Basic Compiler). Vrátená hodnota od najmenej významného bajtu určuje hodnoty červenej, zelenej a modrej, ktoré sa používajú na nastavenie príslušnej farby v systéme RGB používanom v jazyku Visual Basic for Applications.
Príklad
Poznámka: Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.
V tomto príklade je funkcia QBColor použitá na zmenu vlastnosti BackColor formulára odovzdaného ako MyForm na farbu určenú hodnotou ColorCode. Funkcia QBColor akceptuje celočíselné hodnoty v rozsahu 0 až 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form) MyForm.BackColor = QBColor(ColorCode) End Sub