QBColor Function

Syntax

QBColor(num)

Group

Miscellaneous

Description

Return the appropriate color defined by Quick Basic.

Parameters

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

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

See also

RGB( )