Funcția QBColor

Notă: Dorim să vă oferim cel mai recent conținut de ajutor, cât mai rapid posibil, în limba dvs. Această pagină a fost tradusă automatizat și poate conține erori gramaticale sau inexactități. Scopul nostru este ca acest conținut să vă fie util. Vă rugăm să ne spuneți dacă informațiile v-au fost utile, în partea de jos a acestei pagini. Aici se află articolul în limba engleză, ca să îl puteți consulta cu ușurință.

Returnează un lung care reprezintă codul de culoare RGB corespunzătoare la numărul specificat de culoare.

Sintaxă

QBColor ( culoare )

Necesară culoareargument este un număr întreg din intervalul 0-15.

Setări

Argumentul culoare are aceste setări:

Număr

Culoare

Număr

Culoare

0

Negru

8

Gri

1

Albastru

9

Albastru deschis

2

Verde

10

Verde deschis

3

Cyan

11

Light Cyan

4

Red

12

Roșu deschis

5

Magenta

13

Light Magenta

6

Galben

14

Galben deschis

7

Alb

15

Alb strălucitor


Observații

Argumentul culori reprezintă valorile de culoare de utilizat în versiunile anterioare de bază (cum ar fi Microsoft Visual Basic pentru MS-DOS și bază compilator). Începând cu cel semnificativă octet, valoarea întoarsă specifică roșie, verde, albastru valorile și utilizată pentru a seta culoarea corespunzătoare în sistemul RGB utilizate de Visual Basic for Applications.

Exemplu

Notă: Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.

Acest exemplu utilizează funcția QBColor pentru a modifica proprietatea BackColor a formularului transferate în ca MyForm în culoarea indicat de ColorCode. QBColor acceptă valori număr întreg între 0 și 15.

Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
Extindeți-vă competențele Office
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă utilizatorilor Office Insider

Au fost utile aceste informații?

Vă mulțumim pentru feedback!

Vă mulțumim pentru feedback! Se pare că ar fi util să luați legătura cu unul dintre agenții noștri de asistență Office.

×