Picture1.Line (x1, y1)-(x2, y2), QBColor(12)
QBColor 函数
返回一个 Long,用来表示所对应颜色值的 RGB 颜色码。
语法
QBColor(color)
必要的 color 参数是一个界于 0 到 15 的整型。
设置值
color 参数有以下这些设置:
值 颜色 值 颜色
0 黑色 8 灰色
1 兰色 9 亮兰色
2 绿色 10 亮绿色
3 青色 11 亮青色
4 红色 12 亮红色
5 洋红色 13 亮洋红色
6 黄色 14 亮黄色
7 白色 15 亮白色
说明
color 参数代表使用于早期版本的 Basic(诸如 Microsoft Visual Basic for MS-DOS 以及 Basic Compiler)的颜色值。始于最低有效字节,返回值指定了红、绿、蓝三原色的值,用于设置成 VBA中RGB 系统的对应颜色。
picture1.forecolor=vbred
定义前景色,然后画线的时候就会用这种颜色画。