FarPoint.Win.Spread.DrawingSpace.CurvedArrowShape ca = new FarPoint.Win.Spread.DrawingSpace.CurvedArrowShape();
ca.Parent = fpSpread1;
ca.BackColor = Color.Red;
ca.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
ca.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
ca.Anchor = 40;
ca.SetBounds(25, 25, 50, 50);
fpSpread1.ActiveSheet.AddShape(ca);
Dim ca As New FarPoint.Win.Spread.DrawingSpace.CurvedArrowShape
ca.Parent = FpSpread1
ca.BackColor = Color.Red
ca.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
ca.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
ca.Anchor = 40
ca.SetBounds(25, 25, 50, 50)
FpSpread1.ActiveSheet.AddShape(ca)