返回表示与指定颜色编号对应的 RGB 颜色代码的 Long。
语法
QBColor (颜色)
必需的颜色参数是范围 0-15 中的整数。
“设置”
color 参数具有以下设置：
| “数字” | 颜色 | “数字” | 颜色 |
|---|---|---|---|
| 0 | 黑色 | 8 | 灰色 |
| 1 | 蓝色 | 9 | 浅蓝色 |
| 2 | 绿色 | 10 | 浅绿色 |
| 3 | 青色 | 11 | 浅青色 |
| 4 | 红色 | 1.2 | 浅红色 |
| 5 | 洋红色 | 1.3 | 浅洋红色 |
| 6 | Yellow | 14 | 浅黄色 |
| 7 | 白色 | 15 | 亮白色 |
备注
颜色参数表示早期版本的基本 (（如 Visual Basic for MS-DOS 和基本编译器) ）Microsoft使用的颜色值。 从最低有效字节开始，返回的值指定用于在 Visual Basic for Applications 使用的 RGB 系统中设置适当颜色的红色、绿色和蓝色值。
示例
注意
下面的示例演示了在Visual Basic for Applications (VBA) 模块中使用此函数。 有关使用 VBA 的详细信息，请在“搜索”旁边的下拉列表中选择“开发人员参考”，然后在搜索框中输入一个或多个术语。
此示例使用 QBColor 函数将传入MyForm的窗体的 BackColor 属性更改为 ColorCode.
QBColor 接受 0 到 15 之间的整数值。
Sub ChangeBackColor (ColorCode As Integer, _
MyForm As Form)
MyForm.BackColor = QBColor(ColorCode)
End Sub