请各位说的详细一些……谢谢!!! VB code: Option Explicit Dim i As Integer Dim yy(360) As Single Dim X As Integer Dim Y As Integer Dim xx As Single Dim Lcolor As Long Dim Rcolor As Integer Dim Gcolor As Integer Dim Bcolor As Integer Const a = 3.141592654 * 2 Private Sub Form_Load() Picture1.AutoRedraw = True Dim c A