Returnează o valoare Lung care reprezintă codul de culoare RGB corespunzător numărului de culoare specificat.
Sintaxă
QBColor(culoare)
Argumentul de culoarenecesar este un număr întreg din intervalul 0-15.
Setări
Argumentul culoare are următoarele setări:
| Număr | Color | Număr | Color |
|---|---|---|---|
| 0 | Negru | 8 | Gri |
| 1 | Albastru | 9 | Albastru deschis |
| 2 | Verde | 10 | Verde deschis |
| 3 | Cyan | 11 | Bleu deschis |
| 4 | Red | 12 | Roșu deschis |
| 5 | Magenta | 13 | Fucsia deschis |
| 6 | Galben | 14 | Galben deschis |
| 7 | Alb | 15 | Alb intens |
Observații
Argumentul culoare reprezintă valorile de culoare utilizate de versiunile anterioare de Basic (cum ar fi Microsoft Visual Basic pentru MS-DOS și Compilatorul de bază). Începând cu octetul cel mai puțin semnificativ, valoarea returnată specifică valorile roșu, verde și albastru utilizate pentru a seta culoarea corespunzătoare în sistemul RGB utilizat 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 transmis în MyForm culoarea indicată de ColorCode.
QBColor acceptă valori întregi între 0 și 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub