Důležité : Tento článek je strojově přeložený – přečtěte si toto upozornění. Anglickou verzi tohoto článku pro referenci najdete tady.
Vrátí hodnotu typu Long představující kód barvy RGB odpovídající číslu určitou barvu.
Syntaxe
QBColor ( color )
Požadované barvyArgument je celé číslo v rozsahu 0-15.
Nastavení
Argument barvy má tato nastavení:
|
Počet |
Barva |
Počet |
Barva |
|
0 |
Černá |
8 |
Šedé |
|
1 |
Blue |
9 |
Světle modrá |
|
2 |
Green |
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 |
Jasně bílém pozadí |
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
Poznámka : Upozornění ke strojovému překladu: Tento článek přeložil počítačový systém bez zásahu člověka. Společnost Microsoft nabízí tyto strojové překlady proto, aby umožnila uživatelům, kteří nemluví anglicky, získat informace o produktech, službách a technologiích této společnosti. Protože je tento článek strojově přeložený, může obsahovat slovní, syntaktické nebo gramatické chyby.
