Office
Prihlásenie

Funkcia QBColor

Poznámka: Radi by sme vám čo najrýchlejšie poskytovali najaktuálnejší obsah Pomocníka vo vašom vlastnom jazyku. Táto stránka bola preložená automaticky a môže obsahovať gramatické chyby alebo nepresnosti. Naším cieľom je, aby bol tento obsah pre vás užitočný. Dali by ste nám v dolnej časti tejto stránky vedieť, či boli pre vás tieto informácie užitočné? Tu nájdete anglický článok pre jednoduchú referenciu.

Vráti hodnotu typu Long, ktorá predstavuje kód RGB farby zodpovedajúci zadanému číslu farby.

Syntax

QBColor ( farba )

Povinný argument farbaargument je 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 farba 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 formulára odovzdaného ako MyForm na farbu určenú hodnotou 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
Rozšírte svoje zručnosti práce s balíkom Office
Preskúmať školenie
Buďte medzi prvými, ktorí získajú nové funkcie
Pridajte sa k insiderom pre Office

Boli tieto informácie užitočné?

Ďakujeme za vaše pripomienky!

Ďakujeme vám za pripomienky. Pravdepodobne vám pomôže, ak vás spojíme s pracovníkom podpory pre Office.

×