Protected Overrides Sub OnPaint(ByVal e As _
      System.Windows.Forms.PaintEventArgs)
        Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Black)
        e.Graphics.DrawLine(myPen, 50, 50, 200, 50)
        myPen.Dispose()
    End Sub