Private Sub Form1_Paint(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
        Dim gr As Graphics = e.Graphics
        Dim recF As New RectangleF(10, 100, 200, 200)
        gr.DrawEllipse(New Pen(Color.Red, 2), recF)
    End Sub