Dim CurvePoints5() As Point = {New Point(0, 150), New Point(20, 170), New Point(40, 150), New Point(60, 170), New Point(80, 150), New Point(100, 170), New Point(120, 150), New Point(140, 170), New Point(160, 150), New Point(180, 170), New Point(200, 150), New Point(220, 170), New Point(240, 150)}
        drawcurvelabel.DrawCurve(Pen, curvepoints5)