Poznámka: Snažíme se pro vás co nejrychleji zajistit aktuální obsah nápovědy ve vašem jazyce. Tato stránka byla přeložena automaticky a může obsahovat gramatické chyby nebo nepřesnosti. Naším cílem je to, aby pro vás byl její obsah užitečný. Mohli byste nám prosím dát ve spodní části této stránky vědět, jestli vám informace v článku pomohly? Pokud byste se rádi podívali na jeho anglickou verzi, najdete ji tady.
Vrátí hodnotu typu Long představující kód barvy RGB odpovídající číslu určitou barvu.
Syntaxe
QBColor ( barvy )
Požadované barvyArgument je celé číslo v rozsahu 0-15.
Nastavení
Argument barvy má tato nastavení:
|
Číslo |
Barva |
Číslo |
Barva |
|
0 |
Černá |
8 |
Šedé |
|
1 |
Modrá |
9 |
Světle modrá |
|
2 |
Zelená |
10 |
Světle zelená |
|
3 |
Azurová |
11 |
Světle azurový |
|
4 |
Červená |
12 |
Světle červená |
|
5 |
Purpurovou |
13 |
Light purpurovou |
|
6 |
Žlutá |
14 |
Světle žlutou |
|
7 |
Bílá |
15 |
Bílé světlé |
Poznámky
Argument barvy představuje hodnoty barvy použité v dřívějších verzích základní (jako je Microsoft Visual Basic for MS-DOS a základní kompilátoru). Vrácená hodnota začnete s nejméně významným bajt, určuje červeným, zeleným, modré hodnoty a slouží k nastavení požadovanou barvu v na RGB systému jazykem Visual Basic for Applications.
Příklad
Poznámka: Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
Tento příklad používá funkci QBColor změnit vlastnost Barvapozadí formuláře předaný jako MyForm barvu označen ColorCode. QBColor přijímá hodnoty celé číslo od 0 do 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
