0

I am having some trouble drawing a circle that is constant when the program runs. right now I am able to create one of my clock hands (that is going counterclockwise), but I can't figure out how to draw the circle of the clock..any suggestions?

```
Option Strict On
Imports System.Math
Public Class Form1
Dim arr(359) As PointF, counter As Integer
Function rads(ByVal deg As Double) As Double
Return deg * PI / 180
End Function
Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
For i As Integer = 0 To 359
arr(i).X = 100 * Convert.ToSingle(Cos(rads(i))) + 125
arr(i).Y = -100 * Convert.ToSingle(Sin(rads(i))) + 125
Next
End Sub
Private Sub TestButton_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles TestButton.Click
Timer1.Enabled = True
End Sub
Private Sub Timer1_Tick(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles Timer1.Tick
Dim gr As Graphics = picOut.CreateGraphics
Dim a As Graphics = picOut.CreateGraphics
Dim pn As New Pen(Color.Red)
Dim rect As New Rectangle(0, 0, arr(i).X * 2, arr(i).Y * 2)
g.DrawEllipse(pn, rect)
counter += 1 : If counter = 360 Then counter = 0
gr.Clear(Color.Red)
gr.DrawLine(Pens.Black, 125, 125, arr(counter).X, arr(counter).Y)
End Sub
End Class
```