Microsoft Office Online
Přihlášení k webu Moje služba Office Online (Co je to?) | Přihlásit

 
 
Microsoft Office Access
Hledat
Hledat
 
Vyzkoušení nebo nákup
Získání systému Office 2007
Aktualizace: (c) Microsoft
Stahování pro sadu Office
 
 
 
Upozornění: Tuto stránku zobrazujete v nepodporované verzi webového prohlížeče. Tento web pracuje nejlépe v aplikaci Microsoft Internet Explorer 6.0 či novější, v aplikaci Firefox 1.5 nebo v aplikaci Netscape Navigator 8.0 či novější. Další informace o podporovaných prohlížečích

Funkce QBColor
 

Vrátí hodnotu typu Long (Typ dat Long: Základní typ dat pro ukládání velkých celých čísel. Proměnná typu Long je uložena jako 32bitové číslo v rozmezí od -2 147 483 648 do 2 147 483 647.) představující barevný kód RGB odpovídající určenému číslu barvy.

Syntaxe

QBColor(barva)

Požadovaný argument (Argument: Hodnota, která poskytuje informace určité akci, události, metodě, vlastnosti, funkci nebo proceduře.) barva je celé číslo v rozsahu od 0 do 15.

Nastavení

Nastavení argumentu barva:

Číslo Barva Číslo Barva
0 Černá 3 Š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 Purpurová 13 Světle purpurová
6 Žlutá 14 Světle žlutá
7 Bílá 15 Jasně bílá

Poznámky

Argument barva představuje hodnoty barev používané dřívějšími verzemi jazyka Basic (například Microsoft Visual Basic pro MS-DOS a Basic Compiler). Počínaje nejméně významným bajtem určuje vrácená hodnota hodnoty červené, zelené a modré používané pro nastavení příslušné barvy v systému RGB používaném jazykem Visual Basic for Applications.

Příklad

 Poznámka:   Následující příklady uvádějí použití této funkce v modulu jazyka Visual Basic for Applications (VBA). Další informace o práci s jazykem VBA získáte tak, že klepnete na položku Referenční informace pro vývojáře v rozevíracím seznamu vedle pole Hledat a do pole pro hledání zadáte jeden nebo více pojmů.

Tento příklad používá funkci QBColor ke změně vlastnosti .Barvapozadí formuláře předané jako hodnota MyForm na barvu určenou vlastností ColorCode. Funkce QBColor akceptuje kladná celá čísla od 0 do 15.

Sub ChangeBackColor (ColorCode As Integer, _
    MyForm As Form)

    MyForm.BackColor = QBColor(ColorCode)

End Sub

		
Viz také
inzerát