Funkcija QBColor

Važno :  Ovaj je članak strojno preveden. Pogledajteizjavu o odricanju od odgovornosti. Verziju ovog članka na engleskom potražite ovdje.

Vraća dugu koji predstavlja navedeni broj boje koje odgovaraju kod RGB boje.

Sintaksa

QBColor ( color )

Potrebne bojaargument je cijeli broj u rasponu 0 – 15.

Postavke

Argument boja sastoji se od ovih postavki:

Broj

Boja

Broj

Boja

0

Crno

8

Sivo

1

Plava

9

Svijetloplava

2

Zelena

10

Osnovno zelene boje

3

Cijan

11

Svijetli cijan

4

Umetanje simbola

12

Osnovna crvene boje

5

Magenta

13

Svijetlo Magenta

6

Žuti

14

Svijetlo žuto

7

Bijelo

15

Svijetli bijelo


Napomene

Argument boja predstavlja vrijednosti boja korištenih u prethodnim verzijama jezika Basic (kao što je Microsoft Visual Basic for MS-DOS i Basic Compiler). Počevši od najmanje značajnog bajta, vraćena vrijednost određuje crvene, zelene i plave vrijednosti za postavljanje odgovarajuće boje u RGB sustavu koji koristi Visual Basic for Applications.

Primjer

Napomena : Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru koristi funkcija QBColor da biste promijenili svojstvo BackColor obrasca u obliku MyForm boju označenu ColorCode. QBColor prihvaća vrijednosti cijeli broj između 0 i 15.

Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub

Napomena : Izjava o odricanju od odgovornosti za strojni prijevod: ovaj je članak preveo računalni sustav bez ljudske intervencije. Microsoft nudi strojne prijevode da bi korisnicima koji ne razumiju engleski omogućio čitanje sadržaja o Microsoftovim proizvodima, uslugama i tehnologijama. Budući da je preveden strojno, članak možda sadrži pogreške u vokabularu, sintaksi ili gramatici.

Proširite svoje vještine
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

Hvala vam na povratnim informacijama!

Hvala vam na povratnim informacijama! Čini se da bi vam pomoglo kad bismo vas povezali s nekim od naših agenata podrške za Office.

×