A megadott színszámnak megfelelő RGB színkódot jelölő Hosszú értéket ad vissza.
Szintaxis
QBColor ( color )
A szükséges színargumentum egy egész szám a 0–15 tartományban.
Beállítások
A színargumentum a következő beállításokat tartalmazza:
Szám: |
Szín |
Szám: |
Szín |
0 |
Fekete |
8 |
Szürke: |
1 |
Kék |
9 |
Világoskék |
2 |
Zöld |
10 |
Világoszöld |
3 |
Cián |
11 |
Világos ciánkék |
4 |
Vörös |
12 |
Világospiros |
5 |
Magenta |
13 |
Világos magenta |
6 |
Sárga: |
14 |
Világos sárga |
7 |
Fehér |
15 |
Fényes fehér |
Megjegyzések
A színargumentum az Alapszintű verzió korábbi verziói által használt színértékeket jelöli (például a Microsoft Visual Basic for MS-DOS és az Alapszintű fordító). A legkisebb mértékű bájttól kezdve a visszaadott érték a Visual Basic for Applications által használt RGB-rendszerben a megfelelő szín beállításához használt piros, zöld és kék értékeket adja meg.
Példa
Megjegyzés: A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
Ez a példa a QBColor függvénnyel módosítja a MyForm átadott űrlap BackColor tulajdonságát a ColorCodeáltal jelzett színre. A QBColor 0 és 15 közötti egész számértékeket fogad el.
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form) MyForm.BackColor = QBColor(ColorCode) End Sub