配色表

Question

#FFB6C1
#FFC0CB
#DC143C
#FFF0F5
#DB7093
#FF69B4
#FF1493
#C71585
#DA70D6
#D8BFD8
#DDA0DD
以上数据摘自网页的配色表
问:换算成VB-FORM的有什么规律.
要实现红、黄、蓝、绿、青的颜色过渡变化有没有示例程序？谢谢。

Answer 1

将 # 换成 &H 就可以在 VB 中用了，例：
Option ExplicitPrivate Sub Form_Load()
    Me.ScaleMode = vbPixels
End SubPrivate Sub Form_Paint()
    Me.Cls
    Me.Line (0, 0)-(10, 10), &HFFB6C1, BF
    Me.Line (0, 10)-(10, 20), &HFFC0CB, BF
    Me.Line (0, 20)-(10, 30), &HDC143C, BF
    ...
End Sub

Answer 2

用 Timer 控件
Option ExplicitPrivate Sub Form_Load()
    Timer1.Interval = 500
End SubPrivate Sub Timer1_Timer()
    Me.Cls
    Me.Line ...
End Sub