Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
　　Dim rs1 As New FarPoint.Win.Spread.DrawingSpace.RectangleShape()
　　rs1.AlignHorz = FarPoint.Win.HorizontalAlignment.Left
　　rs1.AlignVert = FarPoint.Win.VerticalAlignment.Top
　　rs1.BackColor = Color.Blue
　　rs1.ForeColor = Color.White
　　rs1.Text = "Test"
　　rs1.CanRenderText = True
　　FpSpread1.ActiveSheet.AddShape(rs1, 1, 1)
End Sub

private void Form1_Load(object sender, EventArgs e)
{
　　FarPoint.Win.Spread.DrawingSpace.RectangleShape rs1 = new FarPoint.Win.Spread.DrawingSpace.RectangleShape();
　　rs1.AlignHorz = FarPoint.Win.HorizontalAlignment.Left;
　　rs1.AlignVert = FarPoint.Win.VerticalAlignment.Top;
　　rs1.BackColor = Color.Blue;
　　rs1.ForeColor = Color.White;
　　rs1.Text = "Test";
　　rs1.CanRenderText = true;
　　fpSpread1.ActiveSheet.AddShape(rs1, 1, 1);
}