でけた。（＾＾＠）
VisualBasic2008無料版

Option Strict On
'10/16_org
Public Class Form1
    '色の回転例
    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        Dim i As Integer = &H78FF0000
        Dim ii As Integer
        For ii = 0 To 10
            Dim Brush As New SolidBrush(Color.FromArgb(i + ii * 10))
            e.Graphics.FillEllipse(Brush, 100 + ii * 10, 100, 200, 200)
        Next
        i = &H7800FF00
        For ii = 0 To 25
            Dim Line As New Pen(Color.FromArgb(i + ii * 10))
            e.Graphics.DrawLine(Line, 100, 320 + ii * 5, 300, 320 + ii * 5)
        Next
        Dim line1 As New Pen(Color.FromArgb(78, 255, 0, 0))
        e.Graphics.DrawLine(line1, 100, 500, 300, 500)
    End Sub
End Class