VB中如何使用颜色

这几天我们讲了通用对话框【字体】【打开】【另存为】的使用，今天我们继续来学习【颜色】对话框。

讲【颜色】对话框之前，我们先了解一下VB指定颜色的几种方法。

颜色常数

使用方法：

Form1.BackColor = vbRed '设置窗体背景色为红色。

也可以直接用颜色值：

Form1.BackColor = &HFF00 '设置窗体背景色为绿色。

VB常数值颜色vbWhite&HFFFFFF白色vbCyan&HFFFF00青色vbMagenta&HFF00FF洋红vbBlue&HFF0000蓝色vbYellow&HFFFF&黄色vbGreen&HFF00&绿色vbRed&HFF红色vbBlack&H0黑色

还有许多像vbActiveTitleBar（活动窗口标题颜色）等等，不常用，就不一一列举了。

QBColor函数

QBColor是早期的一个表示颜色的函数，它所能表示的颜色比较少，只有16个。

用法也很简单：

Form1.BackColor = QBColor(1) '设置窗体背景色为蓝色

QBColor(参数) ，参数可以设置为0~15 ，共16色。

0=黑色 1=蓝色 2=绿色 3=青色 4=红色 5=洋红色 6=黄色 7=白色 8=灰色 9=亮蓝色 10=淡绿色 11=亮青色 1=2亮红色 13=亮洋红色 14=亮黄色 15=亮白色

RGB函数

这个函数能表达的颜色范围可就广了，它就像美术生的调色板一样，用红，绿，蓝这三种颜色混合就能调出任意颜色。

R就是红色Red，G就是绿色Green，B就是蓝色Blue

这个函数的用法是RGB(红色值，绿色值，蓝色值)

他们的取值范围是0~255

假如我想要纯蓝色，可以这样RGB(0,0,255)也就是说红色值和绿色值都没有，蓝色值是满的。

Form1.BackColor = RGB(0, 0, 255) '设置窗体背景为纯蓝色

虽然这种方法很灵活，但是也有不便，你想要什么颜色还得去查他们的RGB值，所以VB也提供了"颜色盘"来供你选择，那就是【颜色】对话框。

【颜色】对话框

同样，我们先添加CommonDialog控件（不会的点击这里） ，然后我们看它的使用方法。

因为这个对话框我们只需要取它的颜色值，所以除了Color属性，没有其他的属性。

使用也非常简单，直接取对话框的颜色值即可：

运行效果: