Vráti hodnotu typu Long, ktorá predstavuje kód RGB farby zodpovedajúci zadanému číslu farby.
Syntax
QBColor(farba)
Povinný argument farbaje 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 farby 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 odovzdaného formulára vo vzťahu MyForm k farbe označenej výrazom 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