Restituisce un valore Long che rappresenta il codice colore RGB corrispondente al numero di colore specificato.
Sintassi
QBColor ( colore )
Il coloreargomento necessario è un numero intero compreso tra 0 e 15.
Impostazioni
L'argomento colore ha queste impostazioni:
Numero |
Colore |
Numero |
Colore |
0 |
Nero |
8 |
Grigio |
1 |
Blu |
9 |
Azzurro |
2 |
Verde |
10 |
Verde chiaro |
3 |
Ciano |
11 |
Ciano chiaro |
4 |
Rosso |
12 |
Rosso chiaro |
5 |
Magenta |
13 |
Magenta leggera |
6 |
Giallo |
14 |
Giallo chiaro |
7 |
Bianco |
15 |
Bianco luminoso |
Note
L'argomento colore rappresenta i valori di colore usati dalle versioni precedenti di Basic, ad esempio Microsoft Visual Basic per MS-DOS e il compilatore Basic. A partire dal byte meno significativo, il valore restituito specifica i valori rosso, verde e blu usati per impostare il colore appropriato nel sistema RGB usato da Visual Basic, Applications Edition.
Esempio
Nota: Gli esempi seguenti illustrano l'uso di questa funzione in un modulo di Visual Basic, Applications Edition (VBA). Per altre informazioni sull'uso di VBA, selezionare Riferimenti per sviluppatori nell'elenco a discesa accanto a Cerca e immettere uno o più termini nella casella di ricerca.
Questo esempio usa la funzione QBColor per modificare la proprietà BackColor della maschera passata come MyForm al colore indicato da ColorCode. QBColor accetta valori interi compresi tra 0 e 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form) MyForm.BackColor = QBColor(ColorCode) End Sub