Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
        e.Graphics.DrawEllipse(Pens.Black, 120, 100, 40, 40)
        e.Graphics.DrawLine(Pens.Black, 50, 150, 500, 150)
        e.Graphics.DrawLine(Pens.Black, 50, 150, 50, 300)
        e.Graphics.DrawLine(Pens.Black, 50, 300, 500, 300)
        e.Graphics.DrawLine(Pens.Black, 500, 150, 500, 300)
        e.Graphics.DrawLine(Pens.Black, 250, 150, 250, 300)
        e.Graphics.DrawLine(Pens.Black, 50, 150, 150, 50)
        e.Graphics.DrawLine(Pens.Black, 250, 150, 150, 50)
        e.Graphics.DrawLine(Pens.Black, 150, 50, 450, 50)
        e.Graphics.DrawLine(Pens.Black, 500, 150, 450, 50)
        e.Graphics.DrawLine(Pens.Black, 100, 200, 100, 250)
        e.Graphics.DrawLine(Pens.Black, 100, 250, 150, 250)
        e.Graphics.DrawLine(Pens.Black, 150, 200, 150, 250)
        e.Graphics.DrawLine(Pens.Black, 100, 200, 150, 200)
        e.Graphics.DrawLine(Pens.Black, 300, 200, 300, 250)
        e.Graphics.DrawLine(Pens.Black, 300, 250, 350, 250)
        e.Graphics.DrawLine(Pens.Black, 350, 200, 350, 250)
        e.Graphics.DrawLine(Pens.Black, 300, 200, 350, 200)
        e.Graphics.DrawLine(Pens.Black, 400, 200, 400, 250)
        e.Graphics.DrawLine(Pens.Black, 400, 250, 450, 250)
        e.Graphics.DrawLine(Pens.Black, 450, 200, 450, 250)
        e.Graphics.DrawLine(Pens.Black, 400, 200, 450, 200)
       
    End Sub
End Class
