Vráti hodnotu typu Long, ktorá predstavuje kód RGB farby zodpovedajúci zadanému číslu farby.
Syntax
QBColor(farba)
Povinný argument farbyje celé číslo v rozsahu 0 až 15.
Nastavenia
Argument farby 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 používané staršími verziami jazyka Basic (napríklad Microsoft Visual Basic pre MS-DOS a Základný kompilátor). 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 MyForm podľa farby označenej 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