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