Function Add( _
   ByVal row As Integer, _
   ByVal column As Integer, _
   ByVal rowCount As Integer, _
   ByVal columnCount As Integer _
) As Boolean

Dim instance As ISheetSpanModel
Dim row As Integer
Dim column As Integer
Dim rowCount As Integer
Dim columnCount As Integer
Dim value As Boolean
 
value = instance.Add(row, column, rowCount, columnCount)

bool Add( 
   int row,
   int column,
   int rowCount,
   int columnCount
)

FarPoint.Win.Spread.Model.ISheetSpanModel sp;
DialogResult dlg;
sp = (FarPoint.Win.Spread.Model.ISheetSpanModel)fpSpread1.ActiveSheet.Models.Span;
sp.Add(0, 0, 2, 2);
sp.Add(0, 3, 2, 2);
dlg = MessageBox.Show("Do you want to remove all the spans??", "Clear", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
     sp.Clear();
}

Dim sp As FarPoint.Win.Spread.Model.ISheetSpanModel
Dim dlg As DialogResult
sp = FpSpread1.ActiveSheet.Models.Span
sp.Add(0, 0, 2, 2)
sp.Add(0, 3, 2, 2)
dlg = MessageBox.Show("Do you want to remove all the spans??", "Clear", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
     sp.Clear()
End If