Protected Overrides Sub OnMouseDown(ByVal e As System.Windows.Forms.MouseEventArgs)
   Me.Text = "Wings"
   Dim Num As Integer
   Dim MyPen As New Pen(Color.Black)
   For Num = 1 To 60 Step 5
     Me.CreateGraphics.DrawArc(MyPen, e.X, e.Y, Num, Num, 270, 90)
     Me.CreateGraphics.DrawArc(MyPen, e.X - Num, e.Y, Num, Num, 270, 180)
   Next Num
End Sub 'OnMouseDown