FarPoint.Win.Spread.DrawingSpace.CrescentShape cresc = new FarPoint.Win.Spread.DrawingSpace.CrescentShape();
cresc.Parent = fpSpread1;
cresc.BackColor = Color.Red;
cresc.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth;
cresc.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical;
cresc.Anchor = 20;
arrow.SetBounds(15, 15, 50, 50);
fpSpread1.ActiveSheet.AddShape(cresc);
Dim cresc As New FarPoint.Win.Spread.DrawingSpace.CrescentShape
cresc.Parent = FpSpread1
cresc.BackColor = Color.Red
cresc.CanSize = FarPoint.Win.Spread.DrawingSpace.Sizing.HeightAndWidth
cresc.CanMove = FarPoint.Win.Spread.DrawingSpace.Moving.HorizontalAndVertical
cresc.Anchor = 20
arrow.SetBounds(15, 15, 50, 50)
FpSpread1.ActiveSheet.AddShape(cresc)