Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
　　' シェイプの作成１
　　Dim shape1 As New FarPoint.Win.Spread.DrawingSpace.RectangleShape()
　　shape1.Name = "shape1"
　　shape1.BackColor = Color.Blue
　　FpSpread1.ActiveSheet.AddShape(shape1, 0, 0)

　　' シェイプの作成２
　　Dim shape2 As New FarPoint.Win.Spread.DrawingSpace.RectangleShape()
　　shape2.Name = "shape2"
　　shape2.BackColor = Color.Red
　　FpSpread1.ActiveSheet.AddShape(shape2, 1, 1)
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　' アクティブなシェイプを前面に配置
　　Dim shape As FarPoint.Win.Spread.DrawingSpace.PSShape = FpSpread1.ActiveSheet.GetShape(FpSpread1.ActiveWindowlessObject.Name)
　　FpSpread1.ActiveSheet.DrawingContainer.BringToFront(shape)
End Sub

private void Form1_Load(object sender, EventArgs e)
{
　　// シェイプの作成１
　　FarPoint.Win.Spread.DrawingSpace.RectangleShape shape1 = new FarPoint.Win.Spread.DrawingSpace.RectangleShape();
　　shape1.Name = "shape1";
　　shape1.BackColor = Color.Blue;
　　fpSpread1.ActiveSheet.AddShape(shape1, 0, 0);

　　// シェイプの作成２
　　FarPoint.Win.Spread.DrawingSpace.RectangleShape shape2 = new FarPoint.Win.Spread.DrawingSpace.RectangleShape();
　　shape2.Name = "shape2";
　　shape2.BackColor = Color.Red;
　　fpSpread1.ActiveSheet.AddShape(shape2, 1, 1);
}

private void button1_Click(object sender, EventArgs e)
{
　　// アクティブなシェイプを前面に配置
　　FarPoint.Win.Spread.DrawingSpace.PSShape shape = fpSpread1.ActiveSheet.GetShape(fpSpread1.ActiveWindowlessObject.Name);
　　fpSpread1.ActiveSheet.DrawingContainer.BringToFront(shape);
}