FarPoint.Win.Spread.Model.DefaultSheetSpanModel spanModel = new FarPoint.Win.Spread.Model.DefaultSheetSpanModel();
private void Form1_Load(object sender, System.EventArgs e)
{
    fpSpread1.ActiveSheet.Models.Span = spanModel;
    this.spanModel.Changed += new FarPoint.Win.Spread.Model.SheetSpanModelEventHandler(this.spanModel_Changed);
}
private void menuItem1_Click(object sender, System.EventArgs e)
{
    fpSpread1.ActiveSheet.Models.Span = spanModel;
    spanModel.Add(0, 0, 3, 3);
}
private void spanModel_Changed(object sender, FarPoint.Win.Spread.Model.SheetSpanModelEventArgs e)
{
    switch (e.Type)
    {
        case FarPoint.Win.Spread.Model.SheetSpanModelEventType.SpanAdded:
            listBox1.Items.Add(e.Type.ToString());
            break;
        case FarPoint.Win.Spread.Model.SheetSpanModelEventType.SpanRemoved:
            listBox1.Items.Add(e.Type.ToString());
            break;
        case FarPoint.Win.Spread.Model.SheetSpanModelEventType.SpanUpdated:
            listBox1.Items.Add(e.Type.ToString());
            break;
        case FarPoint.Win.Spread.Model.SheetSpanModelEventType.ModelUpdated:
            listBox1.Items.Add(e.Type.ToString());
            break;
    }
}
	 
	
		Friend WithEvents spanModel As New FarPoint.Win.Spread.Model.DefaultSheetSpanModel()
Private Sub MenuItem38_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem38.Click
FpSpread1.ActiveSheet.Models.Span = spanModel
spanModel.Add(0, 0, 3, 3)
End Sub
Private Sub spanModel_Changed(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.Model.SheetSpanModelEventArgs) Handles
spanModel.Changed
Select Case e.Type
    Case FarPoint.Win.Spread.Model.SheetSpanModelEventType.SpanAdded
        ListBox1.Items.Add(e.Type.ToString())
    Case FarPoint.Win.Spread.Model.SheetSpanModelEventType.SpanRemoved
        ListBox1.Items.Add(e.Type.ToString())
    Case FarPoint.Win.Spread.Model.SheetSpanModelEventType.SpanUpdated
        ListBox1.Items.Add(e.Type.ToString())
    Case FarPoint.Win.Spread.Model.SheetSpanModelEventType.ModelUpdated
        ListBox1.Items.Add(e.Type.ToString())
End Select
End Sub