QBColor Function
Syntax
QBColor(num)
Group
Description
Return the appropriate color defined by Quick Basic.
num | color |
---|---|
0 | black |
1 | blue |
2 | green |
3 | cyan |
4 | red |
5 | magenta |
6 | yellow |
7 | white |
8 | gray |
9 | light blue |
10 | light green |
11 | light cyan |
12 | light red |
13 | light magenta |
14 | light yellow |
15 | bright white |
See Also: RGB( ).
Example
Sub Main
Debug.Print Hex(QBColor(1))
'"800000"
Debug.Print Hex(QBColor(7))
'"C0C0C0"
Debug.Print Hex(QBColor(8))
'"808080"
Debug.Print Hex(QBColor(9))
'"FF0000"
Debug.Print Hex(QBColor(10))
'"FF00"
Debug.Print Hex(QBColor(12))
'"FF"
Debug.Print Hex(QBColor(15))
'"FFFFFF"
End Sub