Spread Windows Forms 12.0 Product Documentation
Swap Method (IRangeSupport)
Example 


FarPoint.Win.Spread Assembly > FarPoint.Win.Spread.Model Namespace > IRangeSupport Interface : Swap Method
Row index from which to begin the swap
Column index from which to begin the swap
Row index of the destination range
Column index of the destination range
Number of rows to swap
Number of columns to swap
Swaps a range of cells from one specified location to another.
Syntax
'Declaration
 
Sub Swap( _
   ByVal fromRow As Integer, _
   ByVal fromColumn As Integer, _
   ByVal toRow As Integer, _
   ByVal toColumn As Integer, _
   ByVal rowCount As Integer, _
   ByVal columnCount As Integer _
) 
'Usage
 
Dim instance As IRangeSupport
Dim fromRow As Integer
Dim fromColumn As Integer
Dim toRow As Integer
Dim toColumn As Integer
Dim rowCount As Integer
Dim columnCount As Integer
 
instance.Swap(fromRow, fromColumn, toRow, toColumn, rowCount, columnCount)
void Swap( 
   int fromRow,
   int fromColumn,
   int toRow,
   int toColumn,
   int rowCount,
   int columnCount
)

Parameters

fromRow
Row index from which to begin the swap
fromColumn
Column index from which to begin the swap
toRow
Row index of the destination range
toColumn
Column index of the destination range
rowCount
Number of rows to swap
columnCount
Number of columns to swap
Example
This example swaps the data between the specified range and the specified location.
FarPoint.Win.Spread.Model.IRangeSupport irs;
DialogResult dlg;
Random r = new Random();
int i, j;
for (i = 0; i<=4; i++)
{
for (j = 0; j<=4; j++)
fpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString());
}
irs = (FarPoint.Win.Spread.Model.IRangeSupport)fpSpread1.ActiveSheet.Models.Data;
dlg = MessageBox.Show("Do you want to swap some data?", "Swap", MessageBoxButtons.YesNo);
if (dlg == DialogResult.Yes)
{
irs.Swap(0, 0, 2, 2, 2, 2);
}
Dim irs As FarPoint.Win.Spread.Model.IRangeSupport
Dim dlg As DialogResult
Dim r As New Random()
Dim i, j As Integer
For i = 0 To 4
For j = 0 To 4
FpSpread1.ActiveSheet.SetValue(i, j, r.Next(1, 200).ToString())
Next j
Next i
irs = FpSpread1.ActiveSheet.Models.Data
dlg = MessageBox.Show("Do you want to swap some data?", "Swap", MessageBoxButtons.YesNo)
If dlg = DialogResult.Yes Then
irs.Swap(0, 0, 2, 2, 2, 2)
End If
See Also

Reference

IRangeSupport Interface
IRangeSupport Members