membuat form bergradasi

kali ini kita akan membuat agar form menjadi lebih cantik yakni dengan membuat form yang bergradasi, untuk membuat form yg bergradasi kita hanya perlu memainkan nilai komposisi warna RGB nya. contoh dalam aplikasi :

Private Sub Form_Paint()
Dim i As Integer

DrawMode = 13
DrawWidth = 6
ScaleMode = 3
ScaleHeight = 255
For i = 0 To 254
Line (0, i)-(Width, i + 1), RGB(255 - i, 0, 0), B
Next i
End Sub