用颜色常数：
Form1.BackColor = vbRed '红
Form1.BackColor = vbBlue '蓝
Form1.BackColor = vbWhite '白
用QBColor函数：
Form1.BackColor = QBColor(n) 'n的值是0到15
用RGB函数：
Form1.BackColor = RGB(r, g, b) 'r、g、b的值分别是0到255
直接用颜色值：
Form1.BackColor = &HFF& '红
Form1.BackColor = &HFF00& '绿
Form1.BackColor = &HFF0000 '蓝
前两种方式只能设置16种颜色，后两种方式可设置16777216色
