QBColor Function

S’applique à
Access pour Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Renvoie un Long représentant le code couleur RVB correspondant au numéro de couleur spécifié.

Syntaxe

QBColor(couleur)

L’argument de couleurobligatoire 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 brillant

    

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 Basic). En commençant par l’octet le moins significatif, la valeur renvoyée spécifie les valeurs rouge, verte et bleue 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 développeur dans la liste déroulante en regard de Rechercher , puis entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise la fonction QBColor pour modifier la propriété BackColor du formulaire transmis par 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