Renvoie une valeur de type Long qui représente le code de couleur RVB correspondant au numéro de couleur spécifié.
Syntaxe
QBColor ( color )
La couleur requiseargument est un nombre entier compris entre 0 et 15.
Paramètres
L’argument color a les paramètres suivants :
|
Nombre |
Couleur |
Nombre |
Couleur |
|
0 |
Noir |
8 |
Gris |
|
1 |
Bleu |
9 |
Bleu clair |
|
2 |
Vert |
10 |
Vert clair |
|
3 |
Cyan |
11 |
Cyan clair |
|
4 |
Rouge |
12 |
Rouge clair |
|
5 |
Magenta |
13 |
Magenta clair |
|
6 |
Jaune |
14 |
Jaune clair |
|
7 |
Blanc |
15 |
Blanc clair |
Remarques
L’argument color représente les valeurs de couleur utilisées par les versions antérieures de Basic (telles que Microsoft Visual Basic pour MS-DOS et le compilateur de base). À compter de l’octet le moins significatif, la valeur retournée spécifie les valeurs rouges, vertes et bleues utilisées pour définir la couleur appropriée dans le système RVB utilisé par Visual Basic pour Applications.
Exemple
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher et entrez un ou plusieurs termes dans la zone de recherche.
Cet exemple utilise la fonction QBColor pour modifier la propriété BackColor du formulaire passé en tant que MyForm à la couleur indiquée par ColorCode. QBColor accepte des valeurs entières comprises entre 0 et 15.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub
