vb.net Arc and CircularArc2d

I am using the following coe to get the midpoint of an Arc:

Dim mp2 As Point3d = _

arc.GetClosestPointTo(arc.GetPointAtParameter((arc.EndParam + arc.StartParam) / 2), arc.Normal, False)

But how do I get the midpoint of a CircularArc2d?

With regard to your posted example, I think the GetClosestPointTo method call is unnecessary. This should suffice:

Dim mp2 As Point3d = arc.GetPointAtParameter((arc.EndParam + arc.StartParam) / 2)

A CircularArc2d works in a similar fashion. Because a CircularArc2d inherits from Curve2d, this should get a midpoint.

Dim mp as Point2D = ca2d.EvaluatePoint((ca2d.EndAngle + ca2d.StartAngle)/2)

Thanx SEANT, it's working.